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men zum Gelingen unse- 
rer Zehschrift Ben, sOon- 
dern Sie auch an der HOT- 
LINE mit Ratschlägen für Ihren 
Computer versorgen. Eine Bitte 
haben sie allerdings an Sie, liebe 
Leser! Wenn Sie die HOTLINE 


Während dieses Heft produziert 
wird, hält der Spätwinter des 
März das Zepter noch fest in der 
Hand. Jetzt ist wohl die beste 
Zeit, um sich mit seinem Heim- 
computer zu beschäftigen. Am 
Programmeingang unserer frei- 
en Autoren haben wir das zu (05651/30013) in Anspruch 
spüren bekommen. Dennoch nehmen wollen, so überlegen 
müssen wir Sie aufrufen, nicht Sie sich vorher genau Ihre Fra- 
nachzulassen. Gute Programme gen und haben Sie bitte Ihre 
haben immer eine Chance ver- Unterlagen dabei. Nur so sind 
öffentlicht zu werden. Nur die wirin der Lage, Sie in möglichst 
Zusammenarbeit mit unseren kurzer Zeit optimal zu beraten 
Lesern garantiert ein gutes Ni- und auch anderen Lesern Zu- 
veau. gang zu diesem Telefonan- 


Ich möchte die Gelegenheit des au zu ermöglichen. Vielen 
Editorials ergreifen, Ihnen unse- 


re kleine Crew vorzustellen, Mit freundlichen Grüßen 
Auf dem Foto sehen Sie rechts ._n 

und links von mir unsere Pro- / Mann 
grammierer Öttfried Schmidt 

und Frank Brall, die nicht nur 
die Programmauswahl verant- 


worten und mit eigenen Pro- 


Uwe Knierim 
Chefredakteur 


Vertrieb 
Inland Jeioh Einzel-und Bahnhofsbuchhandel) 


"One an terreich und Schweiz: 
IKSNONTWETEO, Bar a 

erschemt monatlich ım ri ich-! 1 

Tronic-Verlag, Am Stad 35 FEED Le ER 

3440 Eschwege E 





Tel.:05651/3.00 11 Erscheii - 

Mitglied der Informationsgemeinschaft zur un Men n 
Fesıstellung der Verbreitung von Werbeträgern Erstverkaufstag von “Compute mit” jeweils Mitte 
e.V. (IUW) des Mönats. 

Redaktion: Urheberrecht; 


Alle in "Compute mit“ veröffentlichten Beiträge 
sind urheberrechtlich geschützt. Alle Rechte, 
auch Übersetzungen, vorbehalten. 
Reproduktionen jeder Art (Fotokopien, Micro 
—— a Ent za Di enverarbesunpsanlegen 
Genm n usw,) bedürfen der schriftlic nehmigu: 
Bene: des Verlags. Alle veröffentlichte Software ae 
Druckhaus Dierichs Kassel, Frankfurter Str. 169, von Mitarbeitern des Verlages oder von freien 
350G Kassel Mitarbeitern erstellt. 
Aus ihrer Veröffentlichung kann nicht geschlos- 
sen werden, daß die beschnebenen Lösungen und 
Bezeichnungen frei von Schutzrechte sind. 


Axel Crede (verantwortlich) 

Chefredakteur: Uwe Knierim 

Resakteure: Frank Brall, Ottfried Schmidt, Tho- 
mas Brandt, Martina Strack 





Anfragen nicht an den Vertrich oder Druche- 
rei, sondern nur an den Verlag! 





Report 


Nachrichten ae Wesens ein.en nd 
CeBIT-Messebericht ......:...: ss s0c0H 00 0» 
Software Review .zcescseeeeesneen ans n can 


Saw WW 


Rubriken 





Updates (Korrekturen) .......«..cerresen en 11 
Software Service 2202 =r2es 000 nee nen 32 
Leser-& Meckerecke. ........se220e0n00000 94 
Kleinanzeigen ».... 00 nes se seonun sen 39 





Commodore 

Traffic Memory (VC20) ...2csssere0r en. 11 
Shöoter (VG20): » 2:0, Saum nnan anne JA 
Checksummer unsern esaboans anne. 18 
Neuer Input (C 16/116/ +4). ....esesc0e 00. 15 
Checksummer (C 16/116/ +4) „22.2... 200..++ 17 
Superlist (C 16/116/ +4) 2.2.2220 2 02200000. 18 
Marble (C 16/116/+4-64K). .suauaasnneee. 20 
Character-Generator (C 16/116/+4)......... 26 
Quadrato (E64) „acn nennen Omen. 29 
FCMON Teil 2 (C64) ..u222 24400000 HE 00. 34 
Minas Gundur (C64) 2.2.2220 s00 00a 000 36 
Kurs: Interruptprogrammierung (C 64) ..... 46 
Festspeicher (C64) ....inue era anne 39 


Screen DUMP ;. 00400 no sera an enaree 3 
Double Trouble .........u00s0n ren 0 res ea 0 36 


Bezugspreis; Rücksendung erfolgt nur gegen Erstattung der 

Einzelheft 3,80 DM Kosten, Zusendungen von Software zur Ver- 
Abonnement: Inland 42,- DM im Jahr (12 Aus- öffentlichung sollten folgendes enthalten: 

gaben) eigen EEE se mir dem I 

3 :52- amm (Computerbezeichnung.nicht vergessen?), 

Be EN Von Drucker, ernäihes Listing (keine Kchrib, 

maschinenlistings!), evtl. Bildschirmloros oder 

Programmierabteilung: Hardcopies mit Demonstrauionsbeispielen und 
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der programmtechnischen Besonderhenten, Spiel- 
verlaufbeschreibung), Für eingesändte 
grammunterlagen kann keinerlei Haftung über- 
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Autoren, Manuskripte: j 

Der Verläg nimmt Manuskripte zur Veröffentli- 
chung gerne entgegen. 
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BTX-MODUL 
für C64 und 128 


Bereits letztes Jahr stellte Com- 


modore ein BTX-Decoder-Modul 
vor. Damit lassen sich preiswert 
die Dienstleistungen des BTX- 
Netzes für die Besitzer eines U 64 
oder © 128 nutzen. Die Bundes- 
post erhofft sich davon eine Er- 
schließung des Homecomputer- 
marktes für BTX-Anwendungen. 
Neben Computer und Modul be- 
nötigt man lediglich noch die An- 
schlußboz der Post. 


Mit diesem System lassen sich 
komfortabel BTX-Seiten abrufen. 
Diese kann man bei Bedarf auf er- 
ner Diskettenstation speichern 
oder mit einem grafikfähigen 
Drucker ausdrucken. 

Der Btx-Verkehr wird durch die 
Optionen einer Computerstation 
wesentlich preisgünstiger, da auf- 
gerufene Seiten gespeichert wer- 





den können oder mittels einer 
Kommandodatei verschiedene 
Operationen automatisiert wer- 
den können. 


Das Anwendungsspektrum reicht 
von der Warenbestellung, über 
Bankbuchungen, _Nachrichten- 
dienste bis zu BTX-Mailboxen 
und BTX-Software, 

Das Commodore BTX-Decoder- 
Modul, mit FTZ-Nummer auch 
von der Post zugelassen, wird an 
den Expansionport des C-64 oder 
C 128 gesteckt, Das Modul wird 
über einen speziellen Stecker mit 
der BTX-Anschlußbox der Post 
verbunden, Der Monitor wird di- 
rekt an das BTX-Modul ange- 
schlossen. 

Eine Diskette kann bis zu 100 
Bildschirmseiten aufnehmen. 


*x% 


Computermesse 
in Baden-Baden 





Erstmalig veranstaltet der KS- 
Computerclub die 1. Baden- 
Badener Computermesse, Im Pa- 
villion am alten Bahnhof präsen- 
tieren rund 30 Aussteller, darun- 
ter ATARI, COMMODORE, 
OLIVETTI u.a. ein breites Ange- 
bot an Hardware und Software 
sowohl aus dem Homecomputer- 


bereich wie auch für Personal- 
computer. Eine Sonderschau be- 
faßt sich mit dem Thema BTX. 
Die Messe beginnt am 1. Mai (15 
Uhr) und geht bis zum 3. Mai (9 
- 18 Uhr). Der Veranstaltungsort 
ist in ganz Baden-Baden ausge- 
schildert. 

Info: 07221/75025 





CeBit Hannover: 


große Sensationen 


Dicht gedrängt standen die Stände 
auf der CeBit, der Computers- 
how der Hannovermesse. Ebenso 
stark war der Publikumsandrang, 
Der Blick auf die qualitative Ent- 
wicklung des Computermarktes 
ließ allerdings einiges Enträu- 
schendes zu Tage treten, Wäh- 
rend wirkliche Neuerungen nur 
in unbezahlbaren technischen Re- 
gionen zu bewundern waren (Me- 
gachip z. B.) spielten sich die ei- 
gentlichen Marktsensationen im 
Bereich “Flomecomputer* (was 
eigentlich nicht Thema der Messe 
ist) und der stark. verbilligten 
IBM-Clones in neuen Magerver- 
packungen ab. Bei dem ersteren 
handelt es sich eindeutig um die 
AMIGA-Produktpalerte. In einer 


aufwendigen Präsentation führte 
COMMODORE die neuen 
AMIGA-Varianten 500 und 2000 
vor. Von diesen beiden Geräten 
ist der 500’er mit momentan ca. 
1200 DM nicht nur das billigere, 
sondern im Preis/Leistungsver- 
hältnis auch das angemessenere. 
Mit 'aufgeräumter und effektive- 
ren Platine, 512K und eingebauter 
Pufferung der Echtzeituhr erhält 
der Käufer ein ungeheuer lei- 
stungsstarkes Gerät, daß späte- 
stens nach Weihnachten noch un- 
ter die 1000,- DM-Grenze fallen 
dürfte - eine kleine Sensation. Der 
2009er dagegen bieret kaum 
mehr als der 1000°’er, der schon 
für 1490,-DM zu haben ist, aber 
nun nicht mehr produziert wird, 
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° Die aufgeräumte Platine des AMIGA 500 


Für die noch nicht aufgeräumte 
Platine (mit Uhr), die zusätzli- 
chen 512K Speicher und der Mög- 
lichkeit der praktischen Aufrü- 
stung mittels Slots sind noch mal 
1500,- DM doch eıne ganze Stan- 
ge Geld, Die 3000,- DM für den 
2000'er werden sich daher ganz si- 
cher nicht halten können. Zumal 
auch die otimale Ausrüstung des 
2000’er noch eine ganze Ecke 
mehr kosten wird. Das zweite 





interne Laufwerk ist mit 399,- 
DM noch recht günstig. Extern 
kostet es schon einen Hunderter 
mehr. Die PC-Karte mit 5 1/4 
Zoll-Laufwerk wird 1395, DM, 
‚die AT-Karte 1995,- DM (eben- 
falls mit 5 1/4 Laufwerk} kosten. 
Wer seinen AMIGA an einen 
Farbmonitor anschließen will, be- 
nötigt noch eine PAL-Karte (249,- 
DM) oder er benutzt gleich einen 
RGB-Monitor (ca. 900- DM), 


u 





kan aber seine Computermei- 
sterwerke nicht auf Videorecor- 
der ablegen. Einzig günstig ist für 
den 2000’er die 2 Megabyteerwei- 
terung, die schon für 995,- DM zu 
haben ist, Gesunken sind auch die 
Preise für Festplatten: für 1665,- 
DM erhält man 20 MB inklusive 
Controller, der übrigens in der 
Lage sein soll, bis zu 120 MB zu 
verwalten. 

Insgesamt sind die Preise um den 
2000’er herum zu hoch, werden 
sich aber garantiert so nicht hal- 
ten können Die wahren 
AMIGA-Freunde bedauern so- 
wieso das sanfte Entschlafen des 
1000°er und besonders des RAM- 
Kickstartbereichs, der nun durch 
ROMS ersetzt wird. Einige Soft- 
wareentwickler waren just dabei, 
diesen Adreßraum für eigene Pro- 
gramme zu nutzen, als COM- 
MODORE mit der Meldung ei- 


werden viele die angenehme 
Form des 1000’er vermissen, der 
500’er erinnert in seiner unergo- 
nomischen ‘Art doch zu sehr an 
den ST. 


Der nächste Clou der Commo- 
dore-Leute wurde noch verdeckt 
präsentiert. In der Geschäftsetage 
des Messestandes standen nicht 
nur diverse AMIGA’s, zum Teil 
mit Glasgehäuse, herum, sondern 
auch ein nagelneuer PC 1. Was ist 
das, werden Sie sich fragen. Eben- 
so wie ATARI kommt COM- 
MODORE mit einem superbilli- 

en IBM-Clone auf den Markt, da 
die PC-Verwandten immer mehr 
den Heimbereich erobern. Dies 
führt schließlich dazu, daß ein an 
und für sich überholtes Compu- 
tersystem seinen zweiten Früh- 
ling erlebt, Grund dafür ist sicher- 
lich die massenhaft vorhandene 





Der Mini-PC von Commodore: PC1 


nes festen Kickstarts herrauskam. 
Auch läßt sich jetzt das Kickstart 
nur noch mit Mühe optimieren. 
Diese Operation von COMMO- 
DORE war überflüssig wie ein 
Kropf, daim Gegensatz zum Ara- 
ri ST der geladene Kickstart nach 
Reset noch aktiv ist. Desweiteren 


Software, die wie bei keinem an- 
deren Computersystem auf höch- 
stem Qualitätsniveau steht. Ange- 
fangen hatte alles mit dem Schnei- 
der PC - nun sind auch ATARI 
und Commodore mit einem Mini 
auf dem Markt, die zu dem noch 
weiter abgespeckt wurde als 'das 





Grmbl., ich habe proble- 
mE mu Kam putern.. 
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Schneider-Gerät, Wie bei ATARI 
wartet der Commodore-Mini mit 
einigen fest eingebauten Erweite- 
rungen auf, hat aber keine Mög- 
lichkeiten, Steckkarten aufzuneh- 
men. Diese müssen, ebenso wie 
ein zweites Laufwerk, in einer se- 
paraten Modulbox untergebracht 
werden. Dafür sind die Minis si- 
cherlich bald für unter 1000,- DM 
zu haben - ein idealer Einsteiger- 
preis, 


Logisch, daß Commodore nicht 
der einzige Aussteller auf der Mes- 
se war. In den insgesamt zwölf 
Hallen zeigten Aussteller aus fast 
allen Ländern der Welt ihre Pro- 
duktpaletten, die vom digitalen 
Telefon über Büromöbel bis zum 
Personalcomputer reichten. Ins- 


gesamt 2200 Aussteller belegten 


eine Ausstellungsfläche von mehr 
als 2000 Quadratmetern, Die Er- 
‘wartungen der Messe AG in pun- 
cto Besucherzahlen n weit 
übertroffen. Ca. 40.000 Besucher 
wollten in diesem Jahr die Cebit 
sehen. 
Diejenigen, die sich in erster Linie 
für den Heimcompuiterbereich in- 
teressieren, besuchten neben dem 
Commodorestand natürlich noch 
die Firmen APPLE und ATARI, 
ATARTI stellte diesmal die neuen 
MEGA-ST’s dem breiten Publi- 
kum vor. Es handelt sich dabei 
um ST-Rechner mit einem Spei- 
chervolumen von 1, 2 oder 4 Me- 
gabye RAM. Nex ist außerdem, 
der eigentliche Rechner zu- 
sammen mit mit einem 3 1/2 
Zoll-Laufwerk in einem eigen- 
ständigery Gehäuse untergebracht 
ist. Diese hieuen Geräte sind wahr- 
scheinlich bereits serienmäßig mit 
dem neuen BLITTER (einem 
Grafikchip) ausgerüstet, der be- 
sonders schnelle Speicher-Block- 
verschiebungen ermöglicht. Wie 
es dann allerdings um die Kompa- 
tibilität der ST-Rechner unterein- 
ander bestellt sein wird, wird sich 
in der Praxis herrausstellen. Au- 
ßerdem ist der mathematische 
Co-Prozesor M(C68881 an- 
schließbar, der besonders schnelle 
arichmetische Fließkomma-Ope- 
ratiorıen ermöglicht. r 
neues Peripheriegerät präsen- 
tierre ATARI einen rund 3000 
Mark billigen Laserdruck, der mit 
den MEGA-ST’s zusammenarbei- 
tet. Der besonders günstige Preis 
wird durch ein neues Konzept er- 
möglicht. Der Drucker selbst ent- 
hält im Gegensatz zu den norma- 
len Laserdruckern keinen eigenen 
Prozessor und auch keinen eige- 


nen RAM-Bereich. Diese Aufga- 
ben werden im RAM des MEGA- 
ST’s ausgeführt. 


Wie Commodore wartete ATA- 
RI auch mit einem MINLPG auf 
Auch hier lassen sich in dem Mi- 
nigehäuse keine Steckkarten un- 
terbringen, für die dann ein zwei- 
tes Gehäuse notwendig wäre. Als 
weitere Besonderheit wird die 
Grafikkarte angepriesen, die 
nicht nur einen eigenen zusätzli- 
chen RAM-Bereich verwaltet, 
sondern auch kompatibel zu 
a Hercules und anderen sein 
soll. 


Besondere Leckerbissen wurden 
dem Computerfreak auf dem 
APPLE-Gelände geboten. Der 
Apple II ist tot - es lebe der AP- 
PLE U GS! Mit dem GS will der 
amerikanische Mikrocomputer- 
Pionier APPLE an die großen Er- 
folge der APPLE ILSerie anknüp- 
fen. Für weniger als 4000 Mark 
erhält man ein Paket, welches aus 
einem GS$ mit 512 kByte RAM, 
einem 3 1/2 Zoll-Laufwerk und 
einem _Schwarz-Weiß-Monitor 
besteht. Der II GS$ ist in einem 
PCÄähnlichem Gehäuse unterge- 
bracht, also mit abgesetzter Tasta- 


tur, Leider muß man die Disker- 
tenlaufwerke, erfreulicherweise 
im 3 1/2 Zoll-Format, neben den 
eigentlichen Rechner stellen. 

Der II GS ist kompatibel zu sei- 
nen Vorgängern, besitzt 7 Steck- 
plätze und hat eine maximale 
Bildschirmauflösung von 640 * 
200 Punkten, wobei 4 von 409% 
darstellbar sind. Maximal 16 Far- 
ben können gleichzeitig auf den 
Bildschirm gebracht werden, Der 
Computer basiert auf dem 6502- 
kompatiblen 8/16-Bit-Prozessor, 
der mit 2,8 Megaherz getaktet ist, 
Die eigentliche Höchstleistung 
finden wir in den Neuentwick- 
lungen der Macintosh-Serie. Der 
MAG SE ist eine Weiterentwick- 
lung des MAC PLUS, verfügt 
über 1 Megabyte RAM und über 
maximal zwei eingebaute Lauf- 
werke. Ansonsten ähnelt er stark 
den älteren Familienmitgliedern. 
Bereits seit langer Zeit hat man je- 
doch auf den “offenen“ Macin- 
tosh gewartet. Auf der CeBIT ’87 
wurde er endlich vorgestellt. Der 
MAC IL überzeugt durch sein her- 
vorragendes Design und seine 
große Leistung, Im Inneren arbei- 
tet der leistungsstarke 68020-Pro- 
zessor, der mit 16 Mhz geraktet ist 
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und von einem arıthmetischen 
Co-Prozessor unterstützt wird. 
Der MAC IL ist - im Gegensatz zu 
seinen Vorgängern - vol farbfä- 
hig. Bei einer Auflösung von 640 
* 480 Punkten kann er 256 ver- 
schiedene Farben darstellen. Der 
Bildschirmspeicher nimmt dann 
auch “nur“ 390 Kilobyre in An- 
spruch. Besonders in Verbindung 
mit dem neuen Farbmonitor von 
APPLE kann sich die Bildqualität 
wirklich sehen lassen. Der AMI- 
GA ist im Vergleich dazu eın “al- 
ter Hut“. Dafür ist der MAC II 
natürlich auf lange Sicht für den 
normalen Heimanwender unbe- 
zahlbar. Daß bei APPLE Lei- 
stung seinen Preis hat, ist schon 
seit langem bekannt. Immerhin 
wird man für das neue APPLE- 
Flagschiff mit eingebauten Lauf- 
werke und 40 Megpabyte- 
Festplatte erwa 20.000,- DM hin- 
blättern müssen. 

Der Trend im Homecomputerbe- 
reich geht aber eindeutig zu den 
68000°er Rechnern. Auch die PC- 
Clones werden sich ihren Anteil 
an diesem Markt sichern, jerzt, da 
für die Büroanwendung der AT 
Standard geworden ist. 

Uwe Knierim/Oliver Steinmeier 


Ferien und Computer: 


Nicht wenige werden das Pro- 
blem kennen. Ein neuer Compu- 
ter, erwas Software (meistens 
Spiele) - schon ist man für eine ge- 
wisse Zeit begeistert, Schnell aber 
kommt die Einsicht, daß das 
wohl nicht alles gewesen sein 
karın und die Frage, wie lerne ich 
meinen Computer beherrschen 
werden sich nun viele stellen, Ge- 
nau diese Zielgruppe hat die 
CompuCamp GmbH mit seinen 
attraktiven Ängeboten ım Auge. 


Seit einigen Jahren schon werden 
diese Lernferien schon angeboten, 
die den Anspruch erheben, spiele- 
rischen Computerunterricht mit 
Ferienspaß und Erholung zu ver- 
binden. Der Vormittag ıst dabei 
mit den Computerstunden belegt, 
während der Nachmittag der 
Freizeit und den Sportkursen vor- 
behalten ist. CompuCamp bietet 
dieses Jahr insgesamt 22 Compu- 
terkurse an 6 Standorten in Nord- 
und Süddeutschland. sowie in 





Österreich, An 8 Computertypen 
wird gelehrt, darunter narbelch 
der C 64, aber auch Atari ST und 
AMIGA. Neben Basic kann man 
auch Maschinensprache, Pascal 
und C erlernen, CompuCamp 
bietet noch einiges mehr, daß 
man am besten dem Infomaterial 
der Firma entnehmen kann. 


CompuCamp GmbH 
Goßlerstr. 21, 2000 Hamburg 55 
Tel.: 040/861255 
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3D 


Programmierung 
inBasc 


" 

Das im Teubner-Verlag, Stutt- 
gart, erschienene Buch “3D- 
Programmierung mit Basic“ von 
G. Glaeser ist wohl das Beste 3D- 
Programmierbuch, welches z. Z. 











G. Glaeser; 3D-Programmierung 
mit Basic, Teubner, 1986, 192 Sei- 
terı, 74 Abb. und zahlreiche Pro- 
grammlıstings, Preis: 24,80 DM - 
ISBN 3-519-02540-X 


LICHTRICHTUNG 1,2,1 


‚Bücher 


auf dem Markt zu finden ist. Das 
Buch ist zum Einen eine ausführ- 
liche Grafikprogrammieranlei- 
tung. Wer über einen soliden 
Grundstock ann mathematischem 
und geometrischem Wissen ver- 
fügt, den wird dieses Buch in un- 
geahnte Höhen der 3D-Program- 
mierung führen, 


Zum Anderen bietet es dem mat- 
hematisch weniger gegabten 
durch eine Reihe von ausgereiften 
Programmen {Listings) die Mög- 
lichkeit seinen Einstieg in die 3D- 
Programmierung zu finden, 





BIERBLAS WEINGLAS 
2PıD=15,Hi-1/1) ZPsB=15,Ht1/1) 
Wi=30,W2=-15 W1=30,W2u-40 
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"Die umfassend strukturierten 
Programme werden im Texttei} 
ausführlich erläutert, die Erläute- 
rungen durch zahlreiche Strukto- 
gramme unterstützt. 


Darüberhinaus sind zahlreiche 
Beispiele mit vollständigen Anga- 
belisten aufgeführt, so daß der Le- 
ser z. B. das Erstellen einer 
Punkte- und Kantenliste für einen 
dreidimensionalen Körper sehr 
gut nachvollziehen kann. 


Um den Umfang des Werkes zu 
umreißen möchte ich folgende 
Stickworte aus dem Inhalt auf- 
führen: 


Normal-, Zentralprojektion - 2D 
u. 3D-Kurven - Rotationskörper - 
Sichtbarkeitsalgorhyihmen - 
Dreh-, Schraub- und Stahltlächen 
- 3D-Funktionsgraphen - Alge- 
braische Flächen 3. u. 4. Ordnung 
- Linien gleicher Helligkeit (Isofo- 
ten) auf Drehflächen - Rot-Grün- 
Bilder (Analyhen). 


Zum besonderen Leckerbissen 
für Commodore-Fans wird dieses 
Buch dadurch, daß alle Program- 
me in Simons-Basic geshrieben 
sind. Die Umsetzung ins Basic 3.5 
con C-16 und Plus 4 ist denkbar 
einfach. Im Anhang sind zusätz- 
lich die Apple II-Versionen ange- 
druckt. Die abgedruckten Pro- 
gramme, welche die These, daß 
struckturiertes Programmieren in 
Basic nicht möglich sei, in ein- 
drucksvoller Weise widerlegen, 
unterstützen auch die Ausgabe 
der erstellten Grafiken auf einem 
Plotter (z. B. VG 1520) in recht 
komfortabler Weise. 


Fazit: Ein rundum gelungenes 
Werk, geeignet für jeden, der sich 
mit seinem Mikrocompüter auf 
den Weg in die dritte Dimension 
begeben möchte. 
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Das C-Buch 


Autor: H. Herold, 
W, Unger, Preis: 79,- DM 
Verlag: tewi Verlag GmbH, 
Theo-Prosel-Weg 1, 

8000 München 40 





Textverarbeitung 
für den C16 


Programm: Textline 

System: C16/Plus 4 

Preis: : 55 DM Kassette 
Hersteller: Michael Jahnke CWL 
Vertrieb: ASV-Versand, 2932 
Zettel 1 


Textverarbeitung ist wohl eines 
der verbreitesten Anwendungsge- 
biete für Microcomputer. Beson- 
ders interessant ist dieses Thema 
wenn Textprogramm und Hard- 
ware in die Preisklasse einer’ elek- 
trischen Schreibmaschine kom- 
men, Einer der Computer, der 
diese Bedingungen erfüllt, ist der 
Cie. Dieser Computer hat durch 
den günstigen Preis eine unglaub- 
liche Verbreitung gefunden. Das 
Anfangs relativ dünne Software- 
Angebot ist mittlerweile stark an- 
gewachsen. Mittlerweile gibt es 
auch zahlreiche Textprogramme 
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für dieses System. Wir haben uns 
für diesen Test das neue Pro- 
gramm TEXTLINE angeschaut. 
Dieses Programm wird seid eini- 
ger Zeit für den C16 sowie Plus 4 
auf Kassette angeboten. Eine Dis- 
kettenversion ist bisher nicht er- 
hältlich. TEXTLINE benötigt al- 
so neben Darasette und einen 
eventuellen Drucker keinerlei 
weitere Hardware. Die augen- 
blickliche Version wurde speziell 
für den C16 entwickelt, nutzt da- 
durch nicht den gesammten Spei- 


cher des Plus4. Nach Angabe des 


Autoren ist eine 64k-Erweiterung 
allerdings in Arbeit, TEXTLINE 
ist relativ einfach geschrieben, 
und ist in erster Linie für den Ein- 
steiger entwickelt wurden. Block- 
verschiebung, Wrip-Wrap oder 
dergleichen, wie es das ”Konku- 
renzprodukt” WORDSTAR bie- 
tet, sind bei diesem Programm 
nicht möglich. 


Die Programmiersprache' C_er- 
freut En aufgrund ihrer einfa- 
chen Operationen und ihrer mo- 
dernen Programm- und Daten- 
strukturen immer größerer 
Belichtheit bei der praktischen 
Programmerstellung. C-Kurse in 
der Industrie verlangen mehr als 
nur Darstellungen des C- 
Standards. Das C-Buch der beiden 
kurserfahrenen Informatiker 
Herold und Unger übertrifft in 
Anwendungsnähe, Systemvielfalt 
und typographischem Anspruch 
gängige C-Titel. 

Über 100 lauffähige Musterpro- 
gramme zeigen die Anwendung 
sämtlicher Sprachkonzepte von 
“C* in Realisierung modernster 
Programımerstrategien. Die Mu- 
sterprogramme sind ebenfalls auf 
Diskette erhältlich, wenn Lernen 
durch Edition der Quelltexte er- 
folgen soll. Die wichtigsten Syste- 
me. wie UNIX, ISIS, CP/M, MS- 
DOS und die marktführenden C- 


» 


Software Review 


Der Befehlsvorrat bietet nur die 
Grundvorraussetzungen wie Zei- 
ie einfügen, Zeile löschen, Text 
drucken, Text laden oder Text ab- 
speichern. Auch der Textspeicher 
ist nicht der größte, maximal eine 
DIN A4 Seite mit 72 Zeilen kann 
bearbeitet werden. Da bekannt- 
lich der Drucker 80 Zeichen pro 
Zeile dastellt, werden auf dem 
Bildschirm daraus zwei Zeilen. 


‚Die Übersichtlichkeit wird ’da- 


durch leider nicht verbessert. Das 
vertikale Scrollen wurde umgan- 
gen indem man den Text auf ver- 
schiedenen Bildschirmseiten ver- 


‚teilt. Durch das betätigen einer 


Funktionstaste kann jederzeit ei- 
ne Seite zurück oder vor geblät- 
tert werden. Überschreibt man 
den unteren Bildschrimrand, so 
wird automatisch auf die nächste 
Bildschirmseite gewechselt. Auch 
diese Methode erleichtert nicht 
den Gesamtüberblick, läßt jedoch 
durchaus vernünftiges arbeiten 
zu, Ansonsten arbeitet der Editor 
bildschirmorientiert, das bedeutet 
man kann mit dem Cursor belie- 
big im "Text umher wandern und 
änderungen vornehmen. Zum 
Ausdruck stehen insgesammt vier 
verschiedene. Steuercodes für die 
Drucker SEIKOSHA GP 500, 


Gompuhe mib 


report 


"Compiler von MS, DR, INTEL, 
‘ LATTICE wurden bei der Ent- 


wicklung der Musterprogramme 
berücksichtigt. 

Aufgrund der Vielzahl der abge- 
druckten Beispielprogramme eig- 
net sich das Buch ebensogur für 
den Unterricht oder ein Selbststu- 
dium der Programmiersprache C. 


In dem Buch wird nicht versucht, 
eine möglichst kompakte Be- 
schreibung der Programmierspra- 
che © zu. geben.. 

Vielmehr soll die Abhandlung als 
ein Lehrbuch, das jedes einzelne 
Sprachelement arı Beispielen und 
einfachen Erläuterungen dem Le- 
ser nahebringt verstanden wer- 
den. 

Auf diese Weise eignet sich das 
Buch sowehl für Anfänger und 
Praktiker, die diese Sprache erler- 
nen möchten, in gleicher Weise. 


Frank Brall 





MPS801-MPS803 und Kompati- 
bie zur verfügung. Auf diese wei- 
se lassen sich also auch bestimmte 
Sätze oder einzelne Wörter in ei- 
ner anderen Schriftart ausgeben. 


Alles in allem kann man sagen das ° 
TEXTLINE wohl wirklich nicht 
das modernste oder Leistungsfä- 
higste Programm ist, Auch die 
maximale 72 möglichen Zeilen 
sprechen nicht gerade für er- 
nsthafte Anwendungen. Aller- 
dings dürfte die einfache Gestal- 
tung gerade dem Anfänger einen 
ersten Einstieg erlauben. Da das 
Programm in Basic geschrieben 
wurde, und keinerlei Listschutz 
vorhanden ist, kanrı der erfahre- 
nere Basic-Programmierer eigene 
Ideen oder Verbesserungen ver- 
wirklichen, 


Frank Brall 


Positiv; 

Basic-Programm ungeschützt 
Einfache Handhabung(Anfänger 
freundlich) 


Negativ: 

Kein Text-Scrolling 

Nur 72 Zeilen Textspeicher 

Nur Standard-Befehle (keine 
Blockoperationen oder ähnliches) 


report 
Kung Fu Kid 
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Progamm: Kung Fu Kid, System: 
C-16/Plus4, Preis: 14,95 DM, 
Hersteller/Vertrieb: Gremlin 
Graphics. ; 
Recht gespannt war ich auf 
Gremlins neues Produkt Kung 
Fu Kid. Ansprechend ist allein 
schon das Cover. Auch die Mini- 


Beschreibung auf der Rückseite 
verspricht doch einiges. “Packen- 
de Szenen mit spektakulären Ak- 
tionen werden Sie auf Ihrem 
Commodore erleben“, So steht’s 
da wenigstens. Also ab in den 
Speicher. Nach Laden des Pro- 


‘ grammms teilt sich der Bildschirm 


in einen Anzeigenbereich und 
den Spielbereich. Im Erstgenann- 
ten sind außer dem Programmna- 
men noch Felder für den aktuel- 
len Punktestand und dem High- 
Seore. Auch kann hier zwischen 
Joystick und Tastatur gewählt 
werden, Zudem kann der Benut- 
zer entscheiden, ob er mit oder 
ohne Sound spielen möchte, 
Gleich eines vorweg: Der Auf- 
wand, diese Option zu program- 
mieren, war sicherlich größer, als 
den "Sound" selbst. Was hier den 
beiden Soundchips entlockt wird, 
kann jeder Anfänger nach 5 Mi- 
nuten Studium des Handbuches 
selbst produzieren. Naja, viel- 
leicht ist das Spiel selbst besser. 
gar} ae der Fe 
ste ie ganze Angelegen- 
heit auch nicht gerade viel besser. 
Zunächst erscheinen im oberen 
Teil des Bildes zwei Leuchtbal- 
ken. Einer für die zur Verfügung 
stehende Energie und einer für die 

der Gegner. Im Spielteil 


steht nun die Spielfigur in, so wie- 


es aussieht, einer Art Panzerung, 
(Und das als Kung Fu Schüler?) 
Mittels des Joy's kann er nun 
nach rechts oder links laufen, in 
die Luft springen oder auch mit 


gestrecktem Arm und geballter 
Faust zuschlagen. Ach ja, hier 
kommen seine Gegner ins Spiel. 
Ruckartig und flimmernd laufen 
sie von beiden Seiten auf den Hel- 
den zu. Dieser kann jetzt per Joy 
seinen Gegnern entgegenlaufen. 
Hierbei entwickelt sich das Beste 
an diesem $piel. Denn der Hinter- 
grund ak sauber und ruckfrei. 
Hat der Einzelkämpfer nun mit 
der Faust einen der Angreifer er- 
ledigt, so ist dieser nicht etwa 
K.O. Nein, auch er stürmt wieder 


"gegen den Kung Fu Kid an. Da 


dieses Anıstürmen von beiden Ser- 
ten erfolgt, ergibt sich ein riesiges 
Durcheinander. Zusammen mit 
den schon erwähnten ruckarugen 
Bewegungen und dem Flimmern 
habe ich es nicht mehr wie 3 Run- 
den ausgehalten. Für solche Fälle 
bat der Computer ja noch einen 
Reset Taster. 

Faszit: Kung Fu Kid ist in der un- 
teren Mittelklasse anzusiedeln. Es 


gibt sicherlich schlechtere Spiele 


dieser Art, aber eine ganze Reihe 
bessere (Für das Geld sollte man 
der Frau oder Freundin lieber mal 
einen Blumenstrauß mitbringen.) 


Helmut Niedermeier 





Ein neues Anwendungsprogramm 
mit zahlreichen Einsatzmöglichkeiten 








Gehören Sie auch zum Kreis der 
Commodore 128-Besitzer, die 
noch hilfreiche und nützliche An- 
wendungsprogramme für Ihr Sy- 
stem suchen? Mit dem hier vorge- 
stellten Programm kann Ihnen 
geholfen werden. “Basys 128“ ist 
ein Anwendungsprogramm, das 
für Sie die kompletten Zahlungs- 
vorgänge übernimmt und verwal- 
tet, Wenn Sie bei Ihrer täglichen 
Arbeit mit Zahlungsausgängen zu 
tun haben und das lästige Ausfüt- 
len der Bankformulare leid sind, 
dann sollten Sie sich dieses Pro- 
grammes bedienen. 


Basys 128 


“Basys 128“ übernimmt für Sie 
die Überwachung und Bearbei- 
tung Ihrer Zahlungsvorgänge auf 
er einfache, aber äußerst 
komfortable Weise. Das Pro- 
gramm ist aufgrund einer guten 
Menuesteuerung ohne lange Ein- 
arbeitungszeiten sofort einsatzbe- 
reit. Der Autor hat bei der Pro- 
grammierung die Schwerpunkte 
auf Leistungsfähigkeit und einfa- 
che Handhabung gelegt. So be- 
steht für Sie die Möglichkeit eine 
Lieferanten-Darei mit umfangrei- 
chen Datensätzen anzulegen und 
nach den unterschiedlichsten Kri- 


' Selbstverständlichkeit 


terien oder Suchfaktoren zu ver- 
walten. Alle Einträge sind einzeln 
korrigierbar oder können als Ge- 
samtdatensatz verarbeitet wer- 
den. Ein Datenaustausch mit an- 
deren Menueprogrammen ist eine 
und er- 
leichtert die Arbeit ungemein. 
Neben der Verwaltung dieser 
Lieferanten-Datei haben Sie die 
Möglichkeit, alle Zahlungsaus- 
ginge statistisch auszuwerten. Da- 

i wurden unterschiedliche Dar- 
stellungsarten und verschiedene 
Anwendungskriterien berück- 
sichtigt. Sie erhalten auf diese 
Weise sofort einen optischen Ge- 
samtüberblick über den tatsächli- 
chen Stand Ihrer Zahlungsvor- 
gänge. Kleine Zusatzbonbons die- 
ses Programms sind der Ausdruck 
von Adressaufklebern und die 
Überwachung Ihrer Zahlungster- 
mine, auf deren Erläuterung wir 
an dieser Stelle verzichten können. 
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Durch ein eingebautes Software- 
Druckerinterface ist dieses Pro- 
gramm in Verbindung mit allen 
epson-kompatiblen Druckern 
einsatzfähig. Der Preis des Pro- 
gramms liegt bei 198,- DM ohne 
Versandkosten und darf als durch 
aus realistisch für diese komforta- 
ble Anwendung angesehen wer- 
den. Besonders erwähnenswert ist 
an dieser Stelle noch, daß das Pro- 
gramm bereits seit geraumer Zeit 
vom Autor selbst zu kommerziel- 
len Zwecken eingesetzt wird und 
somit bereits die “Feuerprobe“ 
hervorragend bestanden hat, 


Bezugsquelle bzw. Informations- 
material bei: 


Jürgen Wagner, 
Forstgasse 19 
3440 Eschwege 


Tel.: 05651/6517 oder 40166 
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Sie zahlen bargeldios?! Dann brauchen Sie: 


BAaYS IE8 


Das komfortable Überweisungs-System für Ihren C-128. 


BASYS 128 druckt Ihre Bank-Formulare. 
verwaltet Ihre Zahlungen. 
erinnert Sie an Zahlungs-Termine. 
enthält eine Lieferanten-Datei. 
wertet Ihre Zahlungen statistisch aus. 
druckt Ihre Adress-Etiketten. 
editiert alle gespeicherten Daten. 
ist voll menügesteuert. 
läuft mit allen Epson-kompatiblen Druckern. 
ist, ohne Einarbeitungszeit sofort einsatzbereit. 
enthält ein Software-Druckerinterface. . 


erhalten Sie für 198,- DM bei Vorkasse 
oder plus 6,- DM per Nachnahme, 


Jürgen Wagner, Forstgasse 19, 3440 Eschwege, Telefon 05651-6517 +4.0166 


® gleich mitbestellen: User-Port/Centronics-Druckerkabel 49,- DM ® 


Die Branchenlösung: 


RENTEN (ER 


Machen Sie Schluß mit Karteikästen und Sucharbeit! 


VIDEOTHEK 128 — die elektronische Videotheken-Datei 

— verwaltet die Daten von 2000 Filmen! 

- und von 1500 Kunden! 

-— druckt auf Wunsch ein Journal. 

— wertet Ihre Daten statistisch aus. 

— läuft mit allen Epson-kompatiblen Druckern. 

= ist ohne Einarbeitungszeit sofort einsatzbereit. 
enthält ein Software-Druckerinterface. 


erhalten Sie für 198,- DM bei Vorkasse 
oder plus 6,— DM per Nachnahme. 


Jürgen ‘Wagner, Forstgasse 19, 3440 Eschwege, Telefon 05651-65 17 +4.0166 


® gleich mitbestellen: User-Port/Centronics-Druckerkabel 49,- DM ® 
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Auf vielfachen Leserwunsch haben wir uns entschlossen, unser Druckverfahren für 
Commodore-Listings zu ändern. 

Steuerzeichen sowie alle Grafikzeichen werden zukünftig durch Klartext ersetzt. 
Der Ausdruck ist kompatibel zum bisherigen Druckverfahren, ein neuer Checksum- 
mer ist aus diesem Grund nicht erforderlich. 


Eingabehinweise für alle Commodore Rechner! 

Wer sich schon etwas:näher mit den Commodore Rechnern befaßt har, wird sicher- 
lich wissen, daß der Grafiksatz des C64 sehr viele ähnliche Symbole enthälr. Aus die- 
sem Grund ist es oft sehr schwer, einzelne Zeichen, wie zum Beispiel horizontale Li 
nien, voneinander zu unterscheiden. Besonders macht sich dieser Nachteil in Listings 
bemerkbar, welche die Bildschirmgrafik mit PRINT-Zeilen aufbauen. 

Bisher haben wir in unserem Ausdruck lediglich die Steuersequenzen wie CTRJ-RVS 
ON oder CTRL-BLUE durch Klartext ersetzt, ab dieser Ausgabe werden jedoch auch 
alle Grafikzeichen durch ein Schlüsselcode ersetzt. Durch diese Methode sind Ver- 
wechselungen praktisch völlig ausgeschlossen. 

Wie arbeitet unser Klartext? 

Wer schon nach dem alten Verfahren Programme eingegeben hat, wird sicherlich kei- 
ne Schwierigkeiten mit der Umstellung Fabe: 

Für die neu hinzugekommenen Leser erkläre ich jedoch das Verfahren noch einmal 
grundlegend. i 

Alle sogenannten Steuerzeichen (z.B. eine Farbe) sowie ein Grafikzeichen, werden in 
unseren LISTINGS durch ein CODEWORT, welches die Taste bzw. Tastenkombi- 
nation kennzeichnet, ersetzt. Eine Tabelle der Tastenfunktionen finden Sie in jedem 
Tronic-Magazin (z.B. Computronic o, Compute Mit). Das folgende Beispiel zeigt den 
Unterschied zwischen unserem alten und dem neuen Druckverfahren: 


C64 LISTING MIT CHECKSUMMEN ‘C v1.0) 


10 REM BISHERIGER AUSDRUCK <118> 
20 PRINT" (BEN TTTTTTTt x52> 
30 PRINT# | 4" <85 
20 PRINT" Pr ” <149> 
50 PRINT"ENDE" x244> 


ENDE DES LISTINGS 
CDRUCK:F.B.2 


C-64 LISTING + CHECKSUMMEN {C V1.0) 


10 REM NEUER AUSDRUCK «1627 
20 PRINT"IDOWN4 SO Cr9 SP” «52> 
30 PRINT"ISA SB SC SE SE SF SG SH SI SI SKr" <85> 
40 PRINT"(CA GB CC ED EE CR C6}" <149> 
50 PRINT"ENDE" <246> 


ENDE DES LISTINGS 
TDRUCK:F.B./0.5.1 


Wie in dem Beispiel zu erkennen ist, werden alle Steuertasten durch die entsprechen- 


de Tastenbeschreibung markiert, Das Wort DOWN steht in diesem Fall für Cursor’ 


nach unten; Die Zahl dahinter gibt an wie oft die Taste Selle, Dessgh muß, In unse- 
rem Beispiel müßıe also die Taste CURSOR abwärts viermal betätigt werden. Die ge- 
naue Beschreibung, welche Taste gemeint ist, entnehmen Sie bitte der Klartext- 
Tabelle, welche am Ende dieser Beschreibung abgedruckt ist. Achtung für C16 und 
Ch64 existieren zwei verschiedene Tabellen! 
Wie ebenfalls aus dem Beispiel zu erkennen ist, werden auch alle Grafikzeichen durch 
einen 2-Buchstaben-C.ode ersetzt. Der erste Buchstabe ist entweder ein »5s oder ein 
»Ca, Das »C« steht für die COMMODORE TASTE« und das »$« für die »SHIFT 
TASTE«. Der zweite Buchstabe bezeichnet die Aufschrift der Taste, Das »SA« in’un- 
serem Beispiel bedeutet also, daß die Taste SHIFT zusammen mit dem Buchstaben 
»A« betätigt werden muß. »Ü+« würde bedeuten, daß die Taste COMMODORE zu- 
sammen mit dem PLUS Zeichen gedrückt wird. Wird direkt hinter dieser Buchsta- 
benkombination eine Zahl angegeben, so gibt diese die Anzahl der jeweiligen Zeichen 
an. Das Zeichen COMMODORE Y wurde also in unserem Beispiel 9 mal eingege- 
ben. Durch diese Methode entfäll zukünftig das lästige Abzählen von mehrlachen 
Zeichen. 
Sollten $ie einmal nicht wissen, welche Taste gemeint ist, so hilft Ihnen ein Blick in 
unsere Klartemt-Tabelle weiter. 
Um im Listing Tastenbezeichnungen von normalen Zeichen zu unterscheiden, wer- 
den alle Tastenkennzeichnungen in geschweifte Klammern gesetzt. Diese ‚dürfen 
selbstverständlich nicht eingepeben werden. Auch Lecrzeichen innerhalb geschweif- 
wer Klammern dienen nur zur Trennung einzelner Tastenfunktionen und dürfen 
ebenfalls nicht eingegeben werden. Um die Tastenfunktionen noch besser hervorzu- 
heben, werdert diese ın unterstrichener Kursivschrift (Schrägschritt} dargestellt. Alle 
Zeichen außerhalb der geschweilten Klammern werden normal abgedruckt und auch 
eingegeben. \ 
Aut den ersten Blick hön sich das sicher etwas kompliziert an, ist jedoch in der Praxis 
ganz. einfach. Wenn man sich erst einmal an die in Klartext geschriebenen Zeichen 
gewöhnt hat, wird man den großen Vorteil dieser Schreibweise erkennen. 

Frank Brall 


{ Er 


Somputbe miß 


Neu für alle Commodore Rechner C 64/VC 20 und C 16 


Noch eine wichtige Anmerkung ! 

Aus technischen Gründen können drei Zeichen von unserm Ausgabegerät nicht ver- 
arbeitet werden. Diese Zeichen sind: Pfeil nach links, engl. Pfund, Pfeil nach oben 
— Steht für den Pfeil nach links 

\ Steht für das englische Pfund-Symbol 

* Steht für den Pfeil nach oben 


Klartext-Tabelle für Commodore 64 und VC 20 





DOWN CURSOR ABWÄRTS TASTE NEBEN RECHTEN SHIFT 

LP CURSOR HINAUF SHIFT TASTE & TASTE NEBEN 
RECHTEM SHIFT 

CLR CLEAR SCHIRM SHITT-TASTE & 2. TASTE GANZ RECHTS OBEN 

INSF EINFÜGEN SHIFT-TASTE & TASTE GANZ RECHTS OBEN 

HOME CURSOR IN ECKE 2. TASTE VON GANZ RECHTS OBEN 

DEL DELETE TASTE GANZ RECHTS OBEN 

RIGHT CURSOR RECHTS TASTE GANZ RECHTS UNTEN 

LEFT CURSOR LINKS SHIFT-TASTE & TASTE UNTEN RECHTS 

SPACE LEERZEICHEN LEERTASTE (GROSSTE TASTE} 

Fl FUNKTIONSTASTE EUNKTIONSTASTE Fl 

r2 FUNKTIONSTASTE FUNKTIONSTASTE F2 

Fr EUNKTIONSTASTE EUNKTIONSTASTE F} 

F4 FUNKTIONSTASTE EUNKTIONSTASTE F4 

E5 FUNKTIONSTASTE EUNKTIONSTASTE F5 

F6 FUNKTIONSTASTE FUNKTIONSTASTE F6 

F? FUNKTIONSTASTE FUNKTIONSTASTE F7 

FB FUNKTIONSTASTE FUNKTIONSTASTE F8 

BLACK SCHWARZ CONTROL-TASTE & 1 

WHITE WEISS CONTROL-TASTE & 2 

RED ROT CONTROL-TASTE & 3 

CYAN TUERKIS CONTROL-TASTE & 4 

PURPLE PURPUR CONTROL-TASTE & 5 

GREEN GRUN CONTROL-TASTE & 6 

BLUE BLAU CONTROL-TASTE& 7 

YELLOW GELB CONTROL-TASTE & 8 

RVSON INVERSE EIN CONTROL-TASTE & 9 

RYSOTF INVERSE AUS CONTROL-TASTE & 0 

ORANGE ORANGE COMMODORE-TASTE & } 

BROWN BRAUN COMMODORE-TASTE & 2 

11G.RED HELLROT COMMODORE-TASTE & 3 

DOGREY DUNKELGRAU COMMODORE-TASTE & 4 

MGRFY MITTELGRAU COMMODORE-TASTE & 5 

LIG.GREEN HELLGRUN COMMODORE-TASTE & & 

LIG.BLUE HELLBLAU COMMODORE-TASTE & 7 

HGREY HELLGRAU COMMODORE-TASTE & 8 

ETRL u CTRLZEICHEN CONTROL-TASTE UND DAS ... ZEICHEN 

Be GRAFIKZEICHEN SHIFT-TASTE UND DAS ... ZEICHEN 


En GRAFIKZEICHEN COMMODORE-TASTE UND DAS „., ZEICHEN 
SHIETSRACE UNSICHTBARER CODE SHIFT-TASTE UND SPACE 


mem PRARERFUREPPEEPUERLVELLUELLAFLLEREFEL re 








Klartext-Tabelle für Commadore C16 und Plus 4 











DOWN CURSOR ABWÄRTS TASTE NEBEN INST DEL; RECHTS OBEN 

up CURSOR HINAUF 3. TASTE-NEBEN DOWN VON RECHTS OBEN 
ELR CLEAR SCHIRM 'TASIE ÜBER RETURN ZUSAMMEN MIT SHIFT 
INST EINFÜGEN SHIFT-TASTE & TASTE GANZ RECHTS OBEN 
HOME CURSOR IN ECKE 2. TASTE VON GANZ RECHTS OBEN 

DEL DELETE TASTE GANZ RECHTS OBEN 

RIGHT CURSOR RECHTS 4. TASTE VON RECHTS OBEN 

LEFT CURSÖR LINKS 5. TASTE VON RECHTS OBEN 

SPACE LEERZEICHEN LEERTÄSTE (GRÖSSTE TASTE) 

Fl FUNKTIONSTASTE FUNKTIONSTASTE FI (VORHER DEFINIEREN, 
F2 FUNKTIONSTASTE FUNKTIONSTASTE F2 (VORHER DEFINIERE 
F3 EUNKTIONSTASTE FUNKTIONSTASTE F3 (VÖRHER DEFINIEREN} 
FA FUNKTIONSTASTE FUNKTIONSTASTE F4 (VORHER DEFINIEREN) 
65 FUNKTIONSTASTE FUNKTIONSTASTE F5 (VORHER DEFINIEREN) 
Fb FUNKTIONSTASTE FUNKTIONSTASTE F& (VORHER DEFINIEREN) 
F7 FUNKTIONSTASTE FUNKTIONSTASTE F7 (VORHER DEFINIEREN) 
FR FUNKTKOINSTASTE FUNKTIONSTASTE F& (VÖRHER DEFINILREN) 
BLACK SCHWARZ CONTROL-TASTE & 1 

WHITE WEISS CONTROL-TASTE & 2 

RED ROT CONTROL-TASTE & 3 

CYAN TUERKIS CONTROL-TASTE & 4 

PURPVLE PURPUR CONTROL-TASTE & 5 

GREEN GRUN CONTROL-TANTE & 6 

BLUE BLAU CONTROL-TASTE & 7 

YELLOW GELB CONTROL-TASTE & 8 

RVSON INVERSE EIN CONILROL-TASTE & 9 

RVSUFF INVERSE AUS CONTROL-TASTE & U 

ORNG ORANGE COMMÖODORETASTE ft 

BRN BRAUN COMMOBORE-TASTE & 2 

YL.ON GELBORUN COMMODORE TASTE & 3 

PINK ROSA COMMODORE-TASTE & 3 

BILGRN BLAUGRUN COMMODORE-TASTE & 5 

LBLU HELLBLAU COMMODORE-TASTE & 6 

DHLU DUNKELBLAU COMMODORE TASTE & ? 

LGKN EEELLGRÜN COMMODORE-TASTE 8 H 

CIRL, CIRL-ZEICHEN CONTROL-TASTE UND DAS „. ZEICHEN 

Se GRAHKZEICHEN SHIFT-TASTE UND DAS „. ZEICHEN 

Ks GRAFIKZEICHEN COMMODORE-TASTE LND DAS... ZEICHEN 
FLASHON LINKEN EIN CONTROL-TASTE UND ",” 

FLASHUFE RAITNKEN AUS CONTRON-TASTE UND ",* 


SHILTSPATE UNSICHTBARER CODE SHITT-FASTE UND SPACE 














Run Version Generator 
"aus “Compute mic“ 4/87 


In der Konvertierung ist der Text 
für die Abänderung bei Dataset- 
tenbenutzung hängengeblieben. 


Arbeitet man mit einer Datasette 

muß die Geräteadresse in Zeile 

2090 (OPEN-Befehl) von 8 auf I 
" geändert werden. 

Aufgerufen wird das Programm 

durch den Befehl: 


Sys 32847, ae, ea, sa, “name“, gerät 


*ae“ gibt dabei die Anfangsadresse 
des abzuspeichernden Program- 
mes an, “ea“ die Endadresse und 
*sa“ die Startadresse, zu der der 
Rechner nach dem RUN-Befehl 
verzweigt. Gibt man hier eine 
Adresse an, dıe kleiner als 256 ist, 
wird das Maschinenprogramm 
bei einem RUN nur an die kor- 
tekte Stelle des Speichers kopiert. 
Der Rechner startet es aber nicht. 
Stellt man beispielsweise eine 
RUN-Version de Program- 
imes her, würde man so vorgehen, 
da man den RUN-Generator ja 
mit einem Sys-Befehl starten 
muß, der noch einige Parameter 
verlangt. 


programme _ 





Top Ball aus 
“Compute mit“ 11/86 


Mit den Pokes 

POKE 55, 246 

POKE 56,63 :New 

läuft dieses Programm auch auf 
den &4K-Versionen von C16/ 
116/plus4. 


Softwareservice für die Hefte 
3/87 und 4/87 


Der Druckfehlerteufel hat wieder 
mal gnadenlos und zunächst un- 
bemerkt zugeschlagen. Die. Soft- 
ware für das Heft 4/87 wurde irr- 
tümlich mit der Kennung 3/3 
versehen. Richtig heißt es natür- 


lich 4/3. Damit unsere Software- 
abteilung nicht in totale Verzweif- 
lung gestürzt wird, bitten wir un- 
sere Leser, bei Softwarebestellun- 
gen zu dem Heft 3/87 zusätzlich 
noch die Heftnummer zu ver- 
merken. 

Die Software der Hefte 3/87 und 
4/87 bestellen Sie also richtig wie 


folgt: 





Commodore 

Kassette Best.-Nr.: 

COM CK 3/3 Heft 3/87 
Diskette Best.-Nr.: 
COM CD 3/3 Heft 3/87 


Schneider 
Kassette Best.-Nr.: COM SK 
3/3 Heft 3 
Diskette Best.-Nr.: COM 5D 
3/3 Heft 3 





Llett 4/87 


Commodore 
Kassette Best.-Nr.: 
COM CK 4/3 h 


‚Diskette Best.-Nr.: 


COM CD 4/3 


Schneider 

nn Best.-Nr.: COM SK 
4/3 

Diskette Best,-Nr.: COM SD 
4/3 


Bitte beachten Sie auch die 
Preissenkung für die Schneider- 
Disketten. 


Checksummer für Schneider 
Aufgrund eines Fehlers in der ein- 
schlägigen ROM-Listingliteratur, 
war unser Schneiderchecksum- 
mer nicht kompatibel zu der 
CPC-Version a4, Mit folgender 
kleiner Anderung wird der Fehler 
behoben: 

ın der Zeile 1270 muß der Wert 
&96 in 8269 geändert werden, Ein 
hübscher kleiner Dreher also. 





s 
! 





TRAFFIC 
MEMORY 





Dieses Memory-Spiel -unter- 
streicht die guten Möglichkeiten 
des VC 20 im Multicoior-Modus. 
Nachdem $ie gewählt haben, ob 
Sie die Spielregeln sehen wollen 
oder nicht (mir. Joystick. vor- 
ne/hinten), beginnt das Spiel mit 


5/87 


dem Mischen und Verteilen der 
Karten. Es wird nach den normä- 
len Memoryregeln gespielt. Jeder 


Spieler deckt 2 Karten mir Hilfe‘ 


des Joysticks auf. Hat man zwei 
gleiche Verkehrszeichen aufge- 
deckt, so bekommt man einen 


Punkt gutgeschrieben. Bei unglei- 
chen Pe werden die. Karten 
wieder vedeckt und. der andere 
Spieler ist an der Reihe. Der Spie- 
ler der am Ende die meisten 
Punkte hat, ist der Gewinner. 


‚Dieses Spiel wird $ie nicht nur 


CSompute miß 


Für VE 209 mit 8KB - 


Joystick erforderlich 





stundenlang begeistern, sondern 
auch Ihre Konzentrations- und 
Merkfähigkeit steigern, 


Eingabehinweise: 

Tippen Sie den Lader ab und ver- 
gessen Sie nicht ihn abzuspei- 
chern. Es spielt dabei keine Rolle, 
ob Sie mit Diskette oder Dataser- 
te arbeiten. Ebenso verfahren $ie 
mit dem zweiten Teil, den Sie mit 
SAVE“MEMORY VP“1 (8). 
Dann den dritten Teil abtippen 
und mit i 
SAVE*MEMORY +3K“,1 (8) 
abspeichern. 

Die Zahl in den Klammern, $ie 
können es sich denken, müssen 
Sie start der 3. eingeben, wenn Sie 
ein Diskettenlaufwerk benutzen. 


11 


j) 


f 
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/ programme 


> >< >x< x 


VC2@ LISTING + CHECKSUMMEN IV Vi.0} 


19 PRINT"{CLEAR DOWNZIPISOI44,28:P(307716R,BeLiE, 
8% "CHR$ (34) "MEMORYTSPAGEIVP"CHRE (34) " „"PEEK (186) 
15 IFPEEK{184)=1THENPRINT" CDDAUN}“ 

20 PRINT’ (DIHHSIRUNCHOHEF" 

21 POKE&SL „13: POKEAS2, 131 POKE1YB,2 


Snıeu>ur® 











ENDE DES LISTINBS 


VEZ@ LISTINGS + CHECKSUMMEN 4V V1.0) 


FÜORT=B28T08473 READAFPOKEI „AINEXT 

SYS92B 

FORI=51297033755 READA:POKEI „ANEXT 
FORI=5489T0547 12 READArFOIKEI „ALNERT 
FORI=55B4T05583 1 READAı POKEI „ArNERT 
FORI=&1347067193REABAI POKEI „Ar NEKT 
PRINT"ILLEAR DOHRSFLDAD"CHRE 134) "MEMORY SPACE 3 





+BK"CHRELF4N" „VPEEK (186) ı IFPEEK {1R@I =I THENPRINT" 
{DOUNY” 





8 PRINT" CDOHNSIRISU HONEF"HPOKEASI IST POKEAS2,1S 
ıPOKE198,2 


7 


REM ——- Hi en 


1B DATA234,254,234,167,8,133,251,133,253,169 


11 


DATA2A,133,252,167 


12 DATA12B,133,254,234,160,8,177,263,145,251 
13 DATAZUR, 172,8,288,247 ,250,254,234,282,165 


14 
15 REM 
16 DATA 68,36,124,98,78 
17 
18 
19 


DATA252,2U1 ,20,208, 235,76 





‚98,78,8 
DATA 124,36,36,62,59,58,124,0 
DATA 128,66,64,96,96,98,126,8 
DATA 126,34,34,58,58,58,124,0 


28 DATA 126,64,44,120,76,76,1258,8 


21 


DATA 126,64,64,120,76,96,96,8 


22 DATA 126,46,64,118,78,98,126,0 


23 
24 
25 DATA 2,2,2,6,6 


DATA &6,6&,56,126,98,98,98,8 
DATA 14,16,16,24,24,24,24,8 
‚78,60,@ 


26 DATA 46,48,72,126,98,98,38,@ 


27 


DATA 64,64,64,96,96,96,126,8 


28 DATA 102,90,66,98,99,98,95,0 
29 DATA 114,74,724, 106,104, 106,102,0 
30 DATA 126,65,65,95,79,90,126, 


1 


DATA 126 ,46,66,126,96,96, 94,0 


32 DATA 126,66,66,78,106,100,122,0 
33 DATA 126,66,66,126,108,98,98,8 
34 DATA 126,665,64,126,64,70, 124,8 
35 DATA 126,16,16,24,24,24,24,0 
34 DATA 46,66,66,98,98,98,126,8 

37 DATA 66,66,66,100,104,112,96,0 
38 DATA 98,78,79,66,56,70,182,0 


39 DATA 66,56,24,124,98, 


79,90,8 


48 DATA 65,66,66,690,24,24,24,8 


41 


DATA 126, 2,28,96,96,96,126,8 


42 DATA 255,255,192,192,207 ,200, 200,208 
43 DATA 255,255,3,3,243,19,19,19 

244 DATA 200 ,20R ,200,287,172,192,255,255 
45 DATA 19,19,19,243,3,3,255,255 

46 DATA 255,225,241,225,197,143,223,255 
47 DATA 128,129,129,245,149,247,2,12 

48 DATA 241,138,139,138,242, 148, 144,136 
49 DATA 35,162,163,162,104,8,0,0 

SQ DATA 60,46,153,161,161, 153, 56,68 


51 


DATA 159,4,132,4,4,4,4,4 


52 DATA 114,85,103,85,95,0,8,8 
55 DATA 181 ,95,1983,85,191,0,0,& 


<12> 
<136> 
21563 
x35> 


<aßr 
x139> 
<175> 


<144> 
«1977 


<218> 


54 DATA 39,85,118,95,05,0,9,2 

5 DATA 193,82,82,82,98,9,0,@ 

56 DATA 68,46,70,106,114,99,40,@ 

57 DATA 56,8,8,24,24,24,60,@ 

58 DATA 60,66,2,60,96,96,126,0 

59 DATA &9,2,2,62,6,6,124,0 

68 DATA 64,64,72,72,126,24,24,8 

61 DATA 62,32,32,60,6,70,40,0 

62 DATA 49,66,44,124,98,98,40,8 

63 DATA 126,66,6,28,56,48,40,8 

64 DATA 24,36,36,126,98,79,50,8 

65 DATA 69,66,66,62,6,70,62,0 

66 REM -—-—- VERKEHRSZEICHEN ——— 

67 DATA 2,19,7,37,41,153,159,130 

&8 DATA 128,160,764,08,89,90,86,86 

69 DATA 149,149,149,37,37,9, 10,2 

70 DATA 158,150,192,104,08,96,168,128 

71 DATA 2,18,9,37,41,153,150,158 

72 DATA 128,140,96,88,104,102,1592,150 

73 DATA 159,159,153,41,37,9,18,2 

74 DATA 159,159,102,104,88,96,162,128 

75 DATA 2,18,11,47,47,191,191,191 

76 DATA 128,160,224, 248,248 „254,254 ,254 

77 DATA 191,191,191,47,47,11,18,2 

78 DATA 254,254 ,254,249,248,224,169,128 

79 DATA 2,18,10,42,42,178,191 4191 

60 DATA 128,140,169,168,168,178,2534,258 

81 DATA 191,191,170,42,42,10,18,2 

82 DATA 254,254,170,168,148,168,169, 128° 

83 DATA 5,5,5,5,8,6,5,5 

84 DATA 84,84,84,84,164,144,212,212 

85 DATA 5,5,5,5,5,5,5,5 

B& Data 212,212,212,212,212,212,212,212 

87 DATA 5,5,5,7,74,646,7 

8B DATA 84,83,84,100,188,164,154,188 

89 DATA 7,5,5,3,5,5,545 ı 

99 DATA 100,94,84,04,94,84,84,88 

91 DATA- 85,85,99,95,93,93,93,95 

92 DATA 85,85,213,245,117,117,117,235 

93 DATA 95,93,95,93,93,93,85,095 

44 DATA 213,85,85,99,85,95,85,88 

95 DATA 85,87 ,97,87,95,95,127,127 

96 DATA 84 ,94,94,84,212,212,244,248 

97 DATA 119,87 ,97,87,87,87,87,85 

95 DATA 116,84,04,84,84,84,84,,84 

99 DATA 05,55,87,89,89,87,89,89 

108 DATA 65,95,117,117,253,253,2538,117 

1@i DATA B9,186, 106, 106,97,89,05,85 

182 DATA 117,117,117,117,117,117,65,85 

183 DATA 2,2,11,31,11,11,47,47 

104 DATA 128,128,224,224,224,224,240,249 

185 DATA 44,44,191,191,191,191,170,170 

1@& DATA 56,8, 206,204 ,206,254,178,170 

187 DATA 2,2,11,11,11,11,47,47 

1aa DATA 128,128,224,224,224,224 248,248 

197 DATA 35,44,188,179,191,191,178,178 

11® DATA 2BB,54 ,62,206,254 „254 ,170,170 

111 DATA 2,2,11,11,11,11,47,47 

112 DATA 128,12B,224,224 ,224,224,248,248 

113 DATA 44,32,179,179,179,191,170,178 

114 DATA 56,56,254,254,254 ,254,170,178 

115 DATA 2,2,11,11,11,11,47,47 

116 DATA 128,128,224 ,224 ‚224,224 240,248 

117 DATA 47,47,191,179,128,191,170,178 

11B DATA 248,249,254,206,2,254,178,170 

119 DATA 2,2,11,11,11,98,44,44 

120 DATA 128,128,224,224 ,224,32,56,5& 

121 DATA 44,44,188,191,188,188,179, 170 

122 DATA 56,56,62,254,62,62,178,170 

125 DATA 37@,17@,191,191,191,191 ,47,47 

124 DATA 170,170,254,254 254,254 248,248 

125 DATA 47,47 ,18,11,11y1112,2 

124 DATA 249,240,224,224 ,224,224,128,128 

127 DATA 1,5,3,23,21,95,93,95 

128 DATA &4,60,B0.84,64,117,245,245 

129 DATA 95,95595,31,21,5,5,1 

138 DATA 213,85,213,212,84,00,090,64 

151 DATA 1,5,5,21,21,93,95,95 

132 DATA 64,96,00,84,69,05,117,245 

133 DATA 87,05,87,23,21,3,5,1 

134 DATA 295,245,245,244 ,93,88,98,64 

135 DATA 8,3,3,15,14,62,59,258 

13& DATA 0,172,192,248,176,189,172,175 

137 DATA 250,58,62,14,15,3,3,8 

138 DATA 175,172,190,176,248,192,192,0 
ENDE DES LISTINGS 


Compute mib 


»182> 
<167> 
<4> 
<ı1a4> 
%3> 
xu6r 
s218> 
x111> 
<13> 
<1008> 
<247> 
x232> 
<21> 
<187> 
«228% 
98? 
<B> 
x191> 
<185> 
«115> 
<12> 
x233> 
<222> 
<122> 
1987 
<52> 
x176> 
«1AR> 
<Bbr 
<158> 
<ı> 
<140> 
%117> 
<244> 
<70> 
%156> 
557 
x175> 
x249> 
<129> 
<164> 
<b&> 
<572 
<187> 
<b&> 
<a2> 
“250? 
<x10> 
*208> 
<17> 
x187> 
<198> 
%157> 
«21> 
<171> 
<74> 
<151> 
257 
<175> 
*1917> 
<248> 
<27> 
<199> 
*747 
«127> 
<Z15> 
<> 
<5> 
216> 
<283>. 
<1077 
*“239> 
657 
x2B> 
%173> 
19a? 
<34> 
<aa> 
<166> 
<224> - 
<19> 
<156> 
<52> 
<148> 
<b> 


5/87 





programme 
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649 REM=BILDI=BILD27# «180> 
658 FORI=1T0I6 <09> 
668 IFI<1FTHENK=124+ 14 <153> 
= En 670 IFI>1OTHENX>124+CI-1B) #4 <248> 
VC2® LISTING + CHECKSUNMEN (V VL.B3 ron pe 
19 REN HHHHAHHHRHRRIAHHEE <«155> | #798 NEXTI <20B> 
28 REM # TRAFFIC-MENGRY * <97> | 7am IFACTDISBEMI THENdED <194> 
30 REM # ei <127> | 710 WeWH1SPOKEACTI „KHZEPOKEA (TI +1, K43 <19> 
a0 REM # 10) 11/06 BY * <137> | 728 POKEALTI-22,Xr POKEAIDI-21,X+1 <83> 
59 REM # RALF TRABHARDT # <122> | 730 IFI=IG0RI=SATHEN?SA <147> 
&0 REN HAHHRHHRHHHHREE «205> | 748 FOKEACTI+F IB: POKEACTDI +1+F LBS POKEACHI-- 224, 
78 REM #*# VC-Z@ + BE run <136> | 10: POKEATDI+F-21 ,10:00T0760 <54> 
108 POKE3S6049,285 <205> | 738 POKEACDI+F, 151 POKEALTI+L+F ,LSIPOKEN LEI -ZZUF, 
118 POKES6879 ,141F#33792: POKES6BFA, 1 <172> | 1S:POKEACT) 2146,15 <122> 
120 DIMAtSS) RCSO, B{36):2=8 '<29> 768 IFW=1THENM=I:BIM=A(CTI :GOTOISB «537 
13@ REM#TITELBILD# <B8> 778 IFU=2ANDPEEK ALDI I=PEERK (B IM) > THENW=BSGUUTOBOB <74> 
135 POKES6965, 180 <220> 2 erh IFUCSTHENTER <56> 
148 PRINT" CLEAR DO, SON ET22 RVSOFF}" =1THENG <1472 
: ELEAR DOHN YELLOH BUSON ET22 RVSDFFH" EMO POKEACH) „ZI: PÜKERCHI FI POKEACTI+L „SQ POKER 
15@ PRINT"{DBWN RIGHTZ WHITE S SPACEL4 +F, <221> 
-IMEMORYIS- SPACEIS SI Su6 A au z <291> BE EL PENALSEORBAREE EIN AN EOKERTEN ZUG 
"{DB HTS CYANMH ’ : I » <149> 
168 PRINT TDOHN4 RIGHTS CYANIBLSPACEIRTSPACEIEX. Sa 320 PüKEBEm) 293 POKEB (IM) +F „14 POKEB(M) +1 „50: POKEB 
7 [241,77 " a <91> 
a INS ABDENE ER IR: a rag “TB | 350 POKEBIM)-22,271POKEBIM-22+F ,1IPDKEBIM)-21,2 
ITISPACEHNEIN"  J=0 ae sı1> ee <ism> 
IE enureuumne man aranrimnennge 7° | FREE EEE 
[1 : 4 Jex ': +211> 
ar IFU=4THENPRINT"CHDHE DOWNLP RIGHTIG>NEIN" AT «965 | 960 IFZ=ITHENZ=O:PRINT"CHOHE DOHNISPIELERCSPACEI 
163 FFU=ZTHENPRINT"CHONE DONNI? RICHTIG SPACE)IA 1 CSPAGEHISTISPACEI AMISPACEI ZUG" «53 
TSPALEI"aJal <184> 879 5070448 ’ <182> 
198 IFL=STHEN2IB <za> | O9 RENMAGLEICHE BILDER« «217% 
Jam anıdlas <aa> | 898 IFZ=BTHENSI=E14 <29> 
202 IFJ=1THENL11 <ıas> | OR AM=BiM) <158> 
218 REMeKARTEN MISCHEN" . <> EIG EDEENLIS „IHRER LATS 1 SAUREN HI a Hr . 
5 = 184> 
El 112) PRRORERORIDN NADINE Ses> | 928 PoxeAum „S2sPOKEAUMM «1 „321PDKEAuM-22,324POR 
248 FORD=1T036 <ira,) | AIM-21,32 <165> 
258 YeRNDL.5) 2 YNaYs IFYN=ITHENYN=B.9999 <198> | 759 AtDI=BrACMI=R <226> 
268 ZU=INTIVNRESAKIIHL <ıaa> | 748 IFZ=ITHENBZeEZ+H <ıa9> 
278 ADI=RiZU) <245> | 7% IFS1+52>=1BTHEN?7D <132> 
289 S=ZU:H=R (ZU) <241> | OR E0TO448 <16> 
290 IFS>3&6-KTHENZ3S <97> 378 REM»ENDE» <287> 
SAD RiSI=R(S+1) <> | 798 PRINT“LCLEAR DOWNE RIGNTZIENDESTANDI® <169> 
Z1Q Se5+1 <132> | 79@ PRINTYTDOHN2 RIGHTIISPIELERISPACEI LE" SI <48> 
322 GOTOZIB cı53> | 1008 PRINT" (DOUNZ RIGHTZISPIELERTSPAGEI2: "SZ <94> 
3398 K=K+1aR(SIeH c221> | 181 PRINT" (DOHN4 RIGHTSYNÜCHMALCSBACEITCSPACE2Y 
348 NEXTD 35, Adel <203> 
359 REN»SPIELFELD# <19> | 1820 GOSBUBSSE <85> 
348 PRIN V{CLEAR VELLOH PDHN2 SPACE CA Su2 ER Su 2 IFU=4THENPRINT" (HOGE DONNIT. RIGHTIFINEIN"SS DT 
ER ER 52 <238> 
2 FORDe1104 — ER En2 ER nz E53" <206> | 1823 IFUS2THENPRINT" (HOME DOWNLT RIGHYI3 SPACCYI 
388 IFB>LTHENPRINT= (SPACE [U Zu2 Sr Sa2 Se 502 5 AISPACES "RJ=1 <137> 
* S#2 S+ S#2 St SZ CHr" <208> 1824 IFU=STHENI12S1 <45> 
598 PRINT"ISPAGE S- MHITEILNIYELLOH S= UNITEITNE n 6RTN1828 <al> 
YELLOk 8- HNITEIENIYELLON S- HHITEIENTYELLON S- et EIERN Ba 
INCYELLOW S- WHITE ya 
ey ne ne KHITEII-C <179> | 1250 SOSUBIABHFA=FA-641GOSUBLIABEHSH-I:E0TOSSA <105> 
YELLOM S- WIBen Tveston S- RHITEIITRVELLON 8- 1849 ENSUBIAID: FASFA+6GE:GOSLUBLIGDEHSH+L:GOTOSSU <150% 
WHITEIITCYELLOM S- UHITEIITCYELLON SH" <ı35> | 1970 GOSUB1890, FA=FA-3:GOSUBLIADIS-S-1:EDT05IO  <70> 
BEE ne | Auer | m nee a a 
1 , , “ 
ee er es | a = 
n <96> 
en, {UDHE DONNISPAELERTSBACEN LTERAGE EILSTIS <ıa7> | 1120 PRINT"ICLEAR GREENYDECKENTSPACEIBIELSPACEIM 
50 PRINYOCHOHEISPL.An"s@iG"CSPACEZIEPL.Zu")52 <1SM> | yırkaraneem ran SERCEZIDERISAAEE PURFLENIOYE 
BE Le ERENSERLINITERERARBERAERTEREN <212> | 1138 PRINT" DOWN IMMERCSRACEITWEITSEACEIKARTENS. 
478 IFU=ATHENSS@ «72» | ZAgEraur." <215> 
Ba I SADRSTTHmDTDInEe 22} | 1140 PRINT“ Daun? WENNLSBACEIAUFCSPACEIBEIDENISPA 
490 IFU-AANDHCSTHENGOTDLAGR es CEIKARTENBAUN? DAS CSPACEI GLEICHE (SBACEIABGEBILDE = 
1416] jan THENG 5> 
Pay Sa ir miigalbteunuonnhhiengnln Ba 1158 PRINT“IST,TSPACEIDANNSRAGEFSINDISPACEISIET 
ee ee Sau», | Spaces BONN) NOCHMALSCSPAGEI AMLSBACEIZUG. “ <219> 
538 POKEFA,S11POKEFA+F, 2 2259? | 1160 PRINT" (DOHN2IWERTSPACE > AM CSPALEYENDE (SPAGEI 
Ba anacn 21722 | DIE(SPACES DOWN SPACEIMEISTENTSPAGEIPUNKTECSPACE 
558 REMKJOYSTICK® <127> N SEEAGER BUN ERACKAHATTERAGEI GEWONNEN. * <198> 
560 V=PEEK{37151) aU=D <145> | 11c ee an <214> 
578 POKES7154, 127% IF(PEEK (37152) ANDLZBI=BTHENL=S <154> | 11478 DATAAASD" „AS ,0465,0522,4201 <7a> 
588 POKES7 134,255 <160> 50 4258 ,4327 ,4195,4459 ,4318 <217> 
&08. IFIVANDIA SUTHENDeL Sie, | 1208 DATAA199,4519,4398,4396 ,4264 ‚4516 <171> 
ERST IE ARE SaTHENLE iss, | 12ia DATAM192,4387 ‚9453 ,4525,4399 ,4267 «117% 
EURE RN Garen? 2135, | 1220 DATAASB4,4285,4198,4528,4456,4232 <165> 
a rk ars MBIDISETIENER 123, | 1238 DATA4SS1 ‚4261 ,4324 ,4462,4333,4393 <205> 
639 RETURN “> ENDE DES LISTINGS 
5187 CSompute mit 
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programme 


Sie befinden sich im Weltall. 3 
feindliche Raumschiffe fliegen 
herum. Diese können Sie angrei- 
fen oder verschonen. Ihre Aufga- 
be ist es, diese 3 Raumschiffe zu 
zerstören. Sie können in 8 ver- 
schiedene Richtungen schießen. 
Das Spiel wird mit Joystick ge- 
steuert. Aber Sie ‘können es auch 
auf Tastatur umschreiben, indem 
Sie die Zeilen 5, 700, 710, 720, 


schreiben: 


220 ifpeek (197) = 


Es wird jetzt mit ”o” un 





730, 208 löschen und einfach 


210 ifpeek (197) = S2thena = 
a+1:ifa = t6thena = 8 
i3thena = 
a-1: fa < Schena = 15° 
250 ifpeek (197) = 32ıhen 500 


lenkt und mit "space ne, 





VC2O LISTING + CHECKSUMMEN {V V1.0) 


10 DATA204,204 ,51,951,204,204 ,51,51 
29 BATAC.0,0,0,0,0,0,0 
30 PATAG,24 ,60,126,126,60,24,0 
40 DNTAB,9,40,85,255, 126,60, (07 
DATA3&,126,165, 187,126, 24,36 ,66 
DOTAZ4, 56,66, 145, 129,126436, Ib 
70 DATA&O.66,153.161, 161, 155,66,60 
DATAS4,107,182,251,.326, 192,126, 29 
DATAZ24,24,36,36, 29,66; 255, 1297 
DATA ,14,50,210 ‚TA,3h, 24,8. 
DATA192, 112,76,83, 83,76,112,172- 
DATAG, 24, 36,74 ,210,50,14,1 
DATA129,255,656,90,36,26, 24,24 
DATA16,24,35,50,75,75,112,128 
DATAS,14,50,202,202,505 14,3 
DATA128, 112,76, 75,50,36,24,1& 
DATA112,136,129, 115,12, 12, 140,115 
DATAO, 9.0, 5, 78,76, 76,180 
DATAO,O,O, 178,72, 120,44,58 
DATAZ48,132,.132,247,144,134,138, 133 
DATAO,0,0,146,92,92,82, 140 
DATAt,1,1,231,153,153, 153,151 
DATA129,129,129,129,129,129,129,249 
DATAO,0,0,69,70, 43,42, 17 
DATA0,0,0,4142,60,204 „2,220 
260 DATA144,140,144,244,148,148, 144,150 
270 DATAO,0,0,0,0,0,0,0° 
1000. FÜRT=71&8BT07375:RESNA:PDKET „AsNEXT 
1010 FORA=7424T074313READF: POKEA,P:NEXKTA 
ENDE DES LISTINGS 
[DRUCK:F.B./0.5.1 


109 
110 
120 
130 
140 
150 
160 
170 
180 
190 
200 
210 
220 
230 
240 
250 


<1775 
<235> 
<199> 
<124> 
221> 
x3989> 
<45> 
<10> 


1217 


2297 
<235> 
<14> 

«22893 


“2497. 


<117> 
«207> 


<110> 


<158> 
<177?2 
<220> 


:678> 


<«i116> 


A F37 


«177? 
<83> 
<73> 
<2303 
1457 
<160> 


vE29 LISTING * ÜHECLKSUMMEN (V V1.0) 


$ GOrTN?70OG 

19 POKES6879 ‚8: FDKESAB78, 15: PRINT” (GLEAR} "15C=01 

HI=VERD=1aLI=2: PONEZENAI „258: F=T6074: LA=36878 

20 FRENT" (HHITEIGREBECELLALLALFFROARERAAANAAAAG 

ANAN@ESPAGE FOR (SPAGEZI@ERAAANAAAAAAAABISPALESIE 
m 

30 PRINT+@NAAAARANARANNGLSPACESIRBAAAARAARAAAAAE 
ASPACESIBBAAAAAANAAAAAABLSPACESIENZ 

40 FRINTY@AAAAHAANAAAAAHSTSPACEZIYISPACEIERAAAAA 

BANAANHAARTSPACESIRCAAAHAAAAAAAAARLSPACESIE" 

50 PRENT"@AAAAAAAANANAARTSPALESIERAANANANANAAANE 


SSPACESITRARANAANAAMAAGTSPACEISTUTSPACEZIE" 

&0 FRINTFERAAAANAARAAAAEISPACESH@EARAAAMARAAARAARG 
TSPACERFEAANARAAAAAAANASTSPÄLESHE" 

70 PRINT" ERAAARAAARAABAUTSPACESYERAAMAAANARAAAAB 
XSPACEIVARTSPACE ZIERAAAAARAAAAARRSISPACESIA"T 


EG PRINT"@AAAAAAANANAAARTSPACES?ERARAAARAAAAAAAR 


<76> 


<21> 


<84> 
«71> 
x197> 


<101> 
<x131> 


KSPACEH)RBEBRRLRERERFEREERLREE") 
70 RR=0:AA=0:00=-0 

160 POKEZ6869,755 

3140 6=7907:A=H 

159 IFLI=0THENGDTO740 

154 AA=0:DN=0:RR=O 

155 X=S:K=4:U=S5: E=INT {RND (1)#504) +7680: IFPEER (EI 
<> THEN1SO 

460 F=INT RNDt1)#50&) +7680: IFPEEK (FI<>DITHENL&O 
170 G=INT {RND ( 1) #506) +7680 3 IFPEEK {BI <> THENL7O 
200 IFSC=>HITHENHI=SC 

201 PRINT"tHOHE RVSON DOWN4 RIGHT16>"4SC 
202 FRINT"IHAME RVYSOH DOHNI BIGHTLEY" SH 
203 PRINT" CHOME RVSOH DOHNI4 AIGHT16>";RO 
204 FRINT"{HONE RVSOH DOHNI2 RIGHTI6Y";LI 
205 IFKK=>3THENKK=0:RUO=RO+L:GOSUB7EO: GOTELSO 
206 PDKEC ,AıPOKEE ‚UsPOKEF ‚X: POKEG,Kı POKEF+3,200: 
POKEP+3,O 

207 POKEE-RR, 11 POKEF-00,i:POKEG-AA,1 

208 595028 

240 IFPEEK (251 )=140THENA=A+1: IFA=1&THENA=9 

220 IFPEEK (2531) =28THENA=A-14 IFA<BTHENA=15 

250 IFPEEK (252) =0THENSOO 

260 EE=INT{RNDI1)#4) +1 

270 IFEE=1THENRR=22 

289 IFEE=2THENRR=-22 
290 IFEE=STHENRR=-1. 

3009 IFEE=4THENRR=+1 2 

310 E=E+RR 
329 IFPEEK{E) =DTHENE=E-RR 
330 FF=INT {RND <I>) #7 »+t 
240 IFFF=1THENIG=22 
350 IFFF=2THENGO=-22 
360. IFFF=3THENOD=-1 
370 IFFF=4THENOD=+1 
390 F=F+00 
396 IFPEEKtF}=OTHENF=F-00 
200 GBE=INT{RND(1)#47+1 
A410 IFBG=LTHENAR=22 
420: IFGG=2THENAR=-22 

FO IFGS=3STHENAA=-1 
449, IFGG=ATHENAA=+1 
450 B=-G+4AA 

A&0 IFPEEK {5} =0THENB=G-AA 

470 IFPEEK{CI=3THENFOKEC , 7: G0SUB7704 LI=LI-1:G0F0 
150 
472 
150 
475 IFPEEK (EI=STHENPOKEOC , 7: GOSLB770:Li=LI-11G0TO 
150, 1 
489 GÜOTD200 

500 IFA=BTHENS=Ü-72: Y=B: 2=-22 
510 IFA=ITHENS=C-213 Y=61 7=-21 

520 IFA=SIOTHENS=CHL: YaA: Z=+1 

539 IFA=LLTHENS=D+H23: Yzbı 2=+23 

540 IFA=12THENS=D+22: Y=10: 2=+22 
S50 IFA=13THENS=C+H21: Y=6: Z=+21 
560 IFA=14THENS=C-1: Y=&: Z=-1 ” 
543 IFA=1STHENS=C-23: Y=6: Z=-23 
S70 FORT=1T0Y:POKES,2:POKES-Z,1:POKEP, 230: POKEP+ 
3,220:POKEP ‚O0: POKEP+3,0:8=S+Z 

580 IFFEEK(SI=3THENFOKES, 7: POKES-Z, 1: X=tı KKaKK+t 
»5C=5SC+ 1:FOKEP ‚200: GDSUB790: GOTO200 

585 IFPEEK (S)= =ATHENFOKES, FEPOKES-Z ,11K-1ıKK=KK +1 
:5C=SC+3: POKEP, 210: GOSUB?90:GGTD200 

586 IFPEEK(SI=STHENPOKES ,7:POKES-Z 12 Ul=1:KK=KKri 
:5C=SC45: POKEP, 220: G9SUB790: EOTO200 

570 NEXTT:POKES-2,1:1Z7=0 

&00 GOTO20G 

700 FORFES6 ,284 FORT=OTOS4:READX : POKEBZS+T XEINEXT 
710 WATA169,127,191,59,145,173,32,145,41,128,133 
‚251 ,169,255,141,34 

720 DAIA145,173,31,195,41,20,24,101,251,153,251, 
172,31,145,41 ,32,135, 252,76 

730 GOTO1O 

740 FOKEZ4867 ,240: PRINT" TELEAR DOHNB RIGHTSYGAME 
TSPACEINVER“ 
750 SY8828; IFPEEK (2523=32THEN?7SO 

7&0 Lt=3:R0=115C0=0:4I=HI:A=Bs PRINT" CLEAR} GOTO 
20 

770 FORT=137T0240:POKEP ‚T:POKEP+3,T:NEXTT:POKEP, 
O:POKEF+Z ,O:KK=0 \ 
775 POKEE-RR, 1:POKEF-OD, 1:POKEG-AA, 14 RETURN 

70 POKEE,1rPOKEF,11POKEG, t:RETURN 

790 FORT=1T0100:NEXTT:POKEP ,OzRETURN 

ENDE DES LISTINGS 








IEPEEK<CI=ATHENPOKED,7:B0SUB770: LI=LI-1:50T8 
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<27> 
<220> 
<250> 
<b> 
<97> 
<22B> 


<7i> 
<öh> 
<150> 
<57> 
<b> 
«11> 
<104> 
<106> 
<188> 


<98> 
<82> 
<84> 
<125> 
<244> 
<90> 
<ar> 
<196> 
<229> 
<145> 
<150> 
<221> 
<95> 
<114> 
<226> 
<3> 
<175> 
<180> 
<6> 
<109> 
<187> 
<91> 
<124> 
<40> 
<45> 
<182> 
<80> 


<A0> 
<49> 


<5397> 
<30> 
<82> 
<354> 
<109> 
<254> 
<31> 
<216> 
<198> 
<835> 


<110> 
<202> 
<a4> 
<149> 
<158> 
<151> 
<9) 
<133> 


<223> 
<07> 


<170> 
<ı11> 


<77> 
<137> 
<219> 


<108> 
<45> 


5/87 


Checksummer 


VC 1.0 für VC-20 





Ebenso wie der C-64-Check- 
summer besteht auch das VC-20- 


schinenroutine. Aus Speicher- 
platzgründen konnte jedoch die- 
ses Programm nicht „unter“ dem 
ROM abgelegt werden, sondern 
hier mußte der bekannte Kas- 
settenpuffer herhalten. Dies hat 
den Vorteil, daß kein Basic- 


Programme 


Nachteil besteht darin, daß nach 
der Aktivierung des Checksum- 
mers keine Kassettenoperationen 
durchführbar sind, da diese den 
Kassettenpuffer benötigen. Um 
die Kassettenoperationen wieder 
zu ermöglichen, muß der Check- 


58459“, sowie durch das Betätigen 
der Tasten STOP/RESTORE, 
abgeschaltet werden. Aktiviert 
wird der Checksummer mit SYS 
828. Die Funktion und Arbeits- 
weise stimmt mit dem C-64- 
Checksummer überein und kann 












































Programm aus einer kleinen Ma- Speicher verloren geht. Der summer durch den Befehl „SYS dort nachgelesen werden. 
12 REM BEER <176> 76 FRINT"TASTENTSPACEISTOP/RESTORE" *19768> 
2 REM EHECKSUMMER vC 1.0 <128> 77 FRINT"BETAETIGENTSPAGE} 1 195 
3 REM vCc 20 VERSION «as 1] 80 FOKE Bi6,116:POKE BiB,116:POKE 817,19 
4 REM COPYRIGHT FRANK BRALL “126> &:POKE 819,196: REM SAVE/LOAD AUS <151> 
SREM TRONIC-VERLAG *228> | .90 SYS B2B:PRINT" CDONNSCHELKISFACEIL.OTS 
DREI BERWRERRENEHRERUNNER EIER ERNIR <iBl> | PACELISTLSPACEIAKTIVISPACE I"  x99> 
7 REM «150> Too | ra; re 
10 PRINT"{CLEAR DOWN SPACEHCHECKSUMMERES Er aa a ai <95> 
PACE3VOTSRACEIAL.OTSPACERY" x216> 101 DATA 123,32,115,0,170,240,293,162,25 
20 PRINT "£DGHNILOPYRIGHTLSPALEIFRANKTSE' 5,134,58,144,8,134,285,32,121 <100> 
ACEIBRALL" <221> 102 DATA 197,76,225,199,162,1,134,255,7& 
30 PRINT "IDDHNI----—{SPACEIOS.01.BELSRA „156,196, 166,255,224,1,240,3 .. x181> 
CEIm————" <152> 103 DATA 75,96,197,169,0,4141,249,3, 141,2 
35 PRINT "XDGWN SPACESYTRONIC-VERLAG" <123> 49,3,141 ,250,3,160,2,24 <211> 
460 DA=0:FORI= 828 TD 1020 <158> 104 DATA 177,95,200,113,95,141 ,250,3,160 
&t BEAD DA: SU=SU+DA f <153> +3,200,177,95,240,44,201,34 <143> 
62 FOKE I,DA <bR> 105 DATA 268,10,173,248,3,73,1,141,249,3 
63 NEXT I <83> ‚177,95,174,248,3,208,4 <94> 
65 IF SU<>22919 THEN PRINT“ ZDGHN>FEHLERT 106 DATA 201 ,32,280,279,258,249,3,174,24 
SPACE IN{SPACEIDATA-ZEILENTSPACE "SEND <14> 9,3,24,177,95,109,250,3,141 <31> 
70 PRINT" DOWN” 222> 107 DATA 250,3,202,208,244,76,138,3,56,3 
71 FRINT"AKTIVIERENTSPACEI=BVSTSPACEIB2E 2,240,255,142,246,3,140,247 X203> 
» <9> 108 DATA 3,152,0,180,0,24,32,240,295,149 
72 PRINT"ABSCHALTENTSPALEI=SYSTSPACEISBA »91,32,9,225,169,0,174 <232> 
5" <74> 109 DATA 250,3,32,205,221,169,93,32,9,22 
73 PRINT"VORISPACEIBETRIEBCSPACEIDERESPA 5,32,63,203,32,63,203,172 x21> 
CEIDATA-" <40> 110 DATA 247 ,3,174,246,3,24,32,240,255,1 
74 PRINT"SETTEISPALEIDENTSPACEICHECKSUMM 62,0,134,255,75&,111,3,0 <121> 
ER" <38> 111 DATA 0,0,0,0,32,0 <118> 
75 PRINT"ABSCHALTEN{SPALCEIUND{SPACEIDIE" <BO> 


De Nc 





Bei den “kleinen* Commodore- 
Saubere wurde am Basic 
wirklich nicht gespart. Dasistarke 
Basic V3.5 läßt dem User kaum 
noch Wünsche offen, Leider wur- 
de der bekanntermaßen mäßige 
INPUT-Befehl beibehalten. Mir 
der vorliegenden Erweiterung 
werden einige Schwächen be- 
hoben. 


Bei Eingaben mit dem neuen Be- 
fehl wird ein echtes Eingabefeld 
eröffnet, dessen Lätge Sie selbst 
bestimmen können. Das manch- 





ür C16/116/plus4 


mal sehr lästige, zwangsläufige 
Fragezeichen ist abgeschaltet. Sie 
haben innerhalb dieses Feldes alle 
vom normalen INPUTbefehl her 
bekannten Editiermöglichkeiten. 
HOME, CLEAR, INST/DEL 
usw. wirken nur innerhalb des 
Eingabefeldes. Zusätzlich kann 
der Cursor positioniert werden. 
Mit diesem leistungsfähigen Be- 
fehl können nun semiprofessio- 
nelle Anwendungsprogramme in 
Basic auf dem © 16 realisiert wer- 
den. Die Syntax dieses Befehles 
lautet: 


(Klammeraffe)IN “TEXT“, län- 
ge, variable 


oder, wenn zusätzlich der Cursor 
positioniert werden soll: 


(Klammeraffe)INS x, y; 
*TEXT“, länge, variable 


“länge* 

gibt an, wie viele Zeichen maxi- 
mal eingeben werden dürfen. 
Werte von 1-40 sind erlaubt, das 
Eingabefeld kann aber höchstens 
bis zum Ende der aktuellen Bild- 
schirmzeile gehen, mindestens 2 
Zeichen aber ist es lang, Wenn al- 
so ein Feld bei Spalte 3 eröffner 
werden soll, so kann es höchstens 
36 Stellen lang sein, Größere 
Werte (bis 40) oder 1 ergeben 
zwar keinen Fehler, werden aber 
auch nicht ausgeführt. 


x, 

EN die Koordinaten, an die zu- 
nächst der Fragetext, und direkt 
dahinter das Eingabefeld gesetzt 


k 


220 hechsuiimer kannt leer Dinas unter lolgenden Best&llmininmmern: DV TER (Rassette) alen DV IED(Dishette) 


ER 
INPUT 


“ werden. Der Text kann auch ent- 


fallen. Durch das Positionieren ist 
es möglich, aus einem beliebigen 
Fenster heraus, an einer beliebi- 
gen stelle des Bildschirms Einga- 
ben zu machen, Trotzdem befin- 
det sich der Cursor anschließend 
an der gleichen Stelle des Fensters. 
Es können sowohl eine, wie auch 
mehrere Variablen angegeben 
werden. Mehrere Variablen müs- 
sen durch Komma oder Doppel- 
punkt getrennt werden, Diese Ta- 
sten sind aber im Normalzustand 
gesperrt, um die Fehlermeldung 
EXTRA IGNORED ERROR zu 
vermeiden. Durch PORE 4518,21 
wird: die Eingabe von Komma 
und Doppelpunkt wieder zugelas- 
sen. Mit POKE 4518,21 wird der 
Urzustand wieder erreicht. 


Eingabehinweise 

Zuerst tippt man den Basiclader 
ab und speichert ihn zur Sicher- 
heit. Nach dem Start mit RUN 
werden jetzt die Daten des neuen 
INPU TTbefehls eingelesen und auf 
ihre Richtigkeit überprüft. Dabei 
wird der Lader zerstört, so daß 
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programme 


man ihn bei einem Tippfehler 
wieder neu einladen muß. Sind al- 
le Daten korrekt eingelesen wor- 
den, so wird das eigentliche Pro- 


3 Blocks auf der Diskette und 
kann später mit DLOAD (bzw. 
LOAD) geladen und mit RUN 
gestartet werden. Die Routine 
liegt dann am Anfang des Basic- 


e 64-K-Versionen bestens ge- 


gramm auf Diskette geschrieben, 

Darasertenbesitzer ersetzen im speichers und ist somit auch für 
Basiclader DSAVE durch SAVE. di 

Dieses File belegt dann nur noch eignet, 


C-1& LISTING + CHECKSUMMEN {06 V1.®) 


1787 REM HB EEE 
Run «31> 
1989 REM *## NEW INPUT 

“.* <258> 
1987 REM #* ic) 1987 BY 

A 7972 
1778 REM we TIM SCHLUETER 
7:7 <110> 

1791 REM #r« 4576 BERGE 

.. <11> 
1992 REM MURERKEN REIN EEE 
EEE <36> 
19973 REM : E r <957 
1974 REM ER ETETETEREE 
[22 2 2 2 2 2.2 <38> 
1995 REM #n# SYNTAX:1) @IN [L"TEXT",3 LAENSE,VAR 

“.r i x1335> 
19975 REM ».0 2) @INS %,Y,L"TEKT",3 LAENBE 
‚VAR. au <49> 
1997 REN Be EEE HH 
“run £73> 
1798 DATARR,80,19,C05,07,7E,34,31,. 498 «177> 
1797 DATA31,32,3A,92,08,20,00,F6, 565 <971? 
22209 DATAAF,A7,90,09,803,49,10,8D, 814 x129> 
zag1 DATABI,03,A9,16,85,28,47,12, 56& <25> 
2202 DATNBS,2C,N2,008,9E,15,12,BD, 789 <53) 
2003 DATA353,12,2@0,D2,FF,E8,E@B,74, 1156 <84> 
2294 DATADB,FS,58,95,11,12,28,20, 795 <1787 
2295 DATA4IE,45,57,20,49,4£,50,55, 382 <211> 
za0& DATAS4,290,20,28,45,29,31,37, 482 957 
2997 DATA3S8,37,28,42,59,208,54,47, 487- = <11> 
2028 DATA4D,20,53,43,49,40,55,45, 551 <142> 
29299 DATA54,45,52,208,728,20,11,10, 377 «727 
2910 DATAI2,4E,AF ‚54 ,45,30,20,4B, sie “627 . 
2@11 DATA4F,S®,45,20,59,4F,59,28, 545 <93> 
2812 DATA4C,49,48,45,28,49,54,20, 326 «757 
2013 DATA29,57,41,54,43,48,28,3F, 3518 <168> 
2014 DATASS,54,29,45,4F ,52,28,20, 49& S170> 
2815 DATA29,11,4E,45,57,20,58,52, 477 <158> 
2816 DATA4F,A4,55,43,54,497,4F ,9E, 618 <138> 
2817 DATASS,28,430,41 ,44,45,28,42, 492 <13> 
?@18 DATAS57,20,971,A4,11,9D,24,R2, 882 <g0> 
2019 DATA89,29,73,94,DD,BE,18,D8, 786 <32> 
2229 DATA@7,EB,EB,83,08,F3,F0,97, 1166 <897> 
2021 DATA29,79,24,40,0D7,88,44,47, 726 <163> 
2022 DATA4E,A2,R@,BD,ES,87,75,D0, 19022 41947 
2023 DATAEB,EO,B4,D9,F4,AS,CA,S5, 1418 <220> 
2924 DATADA,AS,CD,85,05,20,73,04, 1877 <28> 
2025 DATACF,53,0D8,24,28,73,04,20, 711 <29> 
2024 DATAB4,9D,EB,28,99,93,46,1C, 884 <37> 
2927 DATAFI,0A,48,208,71,94,20,84, 852 <11> 
2928 DSTAFD,EQA,17,PB,F1,86,CD,48, 1256 <35> 
2027 DATABS,CA,20,43,D8,20,91,9%, 975 <184> 
2OS5@ DATA2R,77,84,09,.22,.00,09,29, 441 <2A3> 
2051 DATAIE,74,20,91,94,28,8B,90, Bab <131> 
2032 DATAZD,894,9D,E9,28,BR,CF,CA, 1170 %135> 
2033 DATABs,05,29,91,74,22,5E,DE, Bi “246> 
2854 DATAN2,29,R9,1D0,29.D2,FF,EB, 1487 <196> 
2035 DATAE4,03,F0,25,95,0A,C09,27, 1984 <128> 
29036 DATADB,FA,20,6A,DE,20,20,DF, 1065 <250> 
2037 DATANF,13,28,D2,FF,A9,2C,BD, 1939 <ı106> 
2039 DATAFF „91 ,n2,02,28,D8,11,C7, 584 <124> 
2037 DATARD,F®O,24,9D,90,02,E8,D9, 858 <71> 
2949 DATATS,2Q,31,90,AD,0N,22,.F@, BB3 <139> 
2941 DATABS,298,56,71,20,BE,BD,22, &61 «235> 


DATARZ,8D,29,FA,11,4C,Bd,10, 
DATA2D,49,DC,20,83,D8,44,CA, 
DATAB1 ‚EA,48,AD,3B,905,91 ,EAy 
DATA9B, 18,45,C08, 9D,BD,FF,AS, 
DATAC® ‚69,20 ,€9,0R,8D,BDUC,FF, 
DATAAS,EF ,‚@D,50,95,F@,F9,68, 
DATAY1,EA,AF,FF ‚BD,AC,FF,BD, 
DATARD,FF,20,C1,DB,A2,0@,DD, 
DATAES,11,F9,07,E8,E9, 15,00, 
DATAF&,C9,13,00,07,96,D6,D4, 
DATABA,E6,D6,AC,5B,11,A2,00, 
DATAB& ,D6,C9,Q@D,DBO,AN,AC,37, 
DATAD?,98,48,84,48,05,07,F@, 
DATABY,19,0R,A9,09,85,07,4C, 
DATA74,CF ‚40,6B,%1,40,77,D9, 
DATAAS,CA,85,C5,A5,CD,05,C4, 
DRATASC,C1,11,1B,90,05,1C,9F, 
DATAYC IE, IF ,9E,12,92,81,98, 
DATAYG,97,98,99, 9A,98,3A,204 
2061 DATA2C,2C,05,04,85,CA,A5,D5, 
2062 DATABS,CD,28,43,0B,42,09,B5, 
2063. DATADD, 9D,E5,07,69,E9,84,08, 1247 

2064 DATAF&,AG,1D,DF,EA,@R,1C,12, 854 

2965 PRENT"TCLEAR DOWNS RIGHT? SPACEIINPUTISRACE 
IWIRDLSPACEIINSTALLIERT"ZPRINT "{RIGHTZ SPACEZIE 
INEN{SPACEIMOMENT (SPACEIBITTE. „.* 

2846 FORT= 4996 TO 4628 STEPB:P=B 

2047 FORI=BT07: READAS:A=DEC AS} HP=P+ASPOKET+E „As 
NEXTI 

2068 READR= IFF<>RTHENPRINT"EINGABEFEHLERTSPACEIT 
NESPACEI ZEILE" PEEK (65) +PEEK (64) #254: END 

2059 NEXT=:PRINT"DOHNIOK. "sPRINT"DASTSPAGEI INPUT 


895 
1117 
1897 
su5t 
958° 
1188 
1352 
1092 
41368 
41271 
787 
1871 
1255 
612 
935 
1396 
647 
817 
1817 
1178 
YI& 


zu47 
zua43 
>44 
2945 
2046 
2847 
2848 
2047 
285% 
2051 
2952 
2053 
and 
2055 
2u56& 
2957 
2058 
2057 
2068 





iSPACEFPROGRANMTSRACEFWIRDTSPACE FNUN{SPACEIGEBAV- 


En" 
2079 POKE4AS,29: PIKEA&, 18:5 DSAVE "TSISPAGEITINPUT"r 
2971 PRINT"{DOWNIUK. "WPRINT"SPAETERLSPAGEIDASTSP 
ALE3 PROGRAMMTSPÄCEINURLSPACEIMITESPACEIDLOADTSPA 
CEHLADENUNDTSPACEIMIT CSPACEIRUNTSPACEISTARTEN,. " 

2872 PRINT" DOHNFTASTEISPALEIDRUECKEN" AGETKEYASE 








RUN 
ENDE DES LISTINGS 


C-i4 LISTING + ECHECKSUNMEN (0C Vi.0) 


18 IFPEEK 144) <17THENPRINT"{CLEAR DOHN2 RIGHTYERS 
TISPAGCEITSISPACEIINPUT{SPACEIDEISPACEILUKTSPACEI 
AKTIVIERENSPACE}!"AEND 
28 GOTO48 
3@ FORI=IT02998: NEXTIıRETURN 
44 COLOR4,12C0LORB,1. 
5@ PRINT"CHOHE2 CLEAR L.BLU DOMN2 RIGHTIAYDENDS 
PAGEI ZULSPACEITSTSPACEIINPUTX" 
&D PRINT"(CDOHN RIGHTP}Y CI LSPACEIBY{SPACEITIMISPA 
CEISCHLUETER" 
70 PRINT"IDOHNZIwHRuenranun nun ante ICHRELLALI "CH 
RE2FI"TYI 
89 FORI=1T018:PRINT"#{SPALE1SI%"3NEXT 
95 PRINT"#Huumeanuunenunen= (UP LEFTII" 

108 PRINT"CHOHE2 DOWNI RIGHTY"CHRS (ZI "TIRIGHTIF 
DOWNF}Y"CHR$(27)"B” 

11@ PRINT"CHOHE DOWNZ RIGHT3IDIESTSPACEIISTISPAE 
EIEIN{SPACE DOHN SPACESIFENSTER" I BOSLIBSA: FORI=1T 
0S5:LISTzNEXT f 
120 PRINT"ICLEAR DOWRZ3 RIGHTZIWIELSPACEIMANTSPAG, 
E}SIEHT"IGOSUBSA 

13@ PRINT"ICLEAR BOHN23MACHEN{SPACEISIETSPACEINU 
N{SPACEZIEINEISPÄACEIEINGABE" 

149 2 

150 3 

148 @INS17,12,"HIERISPACEI" „6,0% 

179 u 

188 3 

198 PRINT" CLEARYDASTSPACEIFENSTERTSPACEITSTESRA 
CEYWIEDERISPACEIDA." 

289 PRINT" (DOHNISIELSPACEISEHEN, SIESPALEZIKONNT 
EN{SPACE?NURTSPAGEISCSPACEZIZEICHENTSPACEIEINGEB 
EN": S0SURIE 

218 LIST16B 

ENDE DES LISTINGS 
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<188> 
<a3> 
<1&> 
<B@> " 
<120> 
<ı175> 
<19> 
<B> 
<1197> 
<15>7 
<164> 
<213> 
<23B> 
<«15R0> 
<214> 
<171> 
<173> 
<69> 
<243> 
1903 
x“127> 
<a4> 
<243> 


<50> 

<252> 
1397> 
«2143 
<58> 

«150> 
«179> 
<242> 


<127> 
<149 
179 
<248> 


<B> 
<53> 
<21> 
<54> 
<181> 


<&1> 


<91> 
<166> 


<129> 
<198> 
<208> 
<129> 
<228> 
<238> 


<228> 


<81> 
<49> 
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Checksummer 
für C16/116/plus 4 


Stark verbessert, der Check- 
summer OV 2.0 


Obwohl schon durch‘ die alte 
Checksummer-Version  OV1.0 
das Eingeben von Listings erheb- 
lich vereinfacht wurde, gab es im- 
mer noch kleine Mängel in der 
Bedienung. Insbesondere die Tar- 
sache, daß Listings in einem 
"Stück" eingegeben werden muß- 
ten, wirkte sich sehr nachteilig 
aus. Programme die am Vortag 
begonnen wurden, mußten später 
ohne Checksummer vervollstän- 
digt werden, Lediglich die Be- 
sitzer eines Tloppylaufwerkes 
kannten diese Probleme nicht. 
Ein weiterer Nachteil trat bein 
nachträglichen Editieren von Pro- 
grammzeilen auf, welche linger 
als 40 Zeichen waren. 


Alle diese Nachteile sind in der 
neuen Version OV2.0 nicht mehr 
vorhanden. Jerzr können Pro- 
gramme, welche bereits eingege- 
ben wurden, nachträglich mit 
dem Checksummer kontrolliert 
werden. Um dies zu bewerkstelh- 
gen lädt man zuerst den Check- 
summer von Kassette bzw. Dis- 
kette, starter ihn mit RUN und 
lädt das zu. prüfende Basicpro- 
gramm nach. jetzt wird der 


‚Checksummer mi SYS 4097 akui- 
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viert, Um eine Zeile zu überprü- 
fen, fährt man mit dem Cursor 
auf diese und betätigt die 
RETURN-Taste. Danach ver- 
leicht man die Checksumme am 
inken oberen Bildschirmrand 
mit der abgedruckten Checksum- 
me im Heft. Stimmt diese Symine 
nicht überein, so ist die eingegebe- 
ne Zeile fehlerhaft und sollte kor- 
rigiert werden. Beachten $ie bitte, 

daß die Checksummen der neuen 


Version identisch mut der alten: 


Version sind, diese jedoch jetzt 
formadert (mit führenden Nul- 
len) ausgegeben werden. Das Be- 


deutet die Checksumme <008> 
entspricht der Checksumme 
<B>. 


Die Arbeitsweise und Funktion 
des Checksummers ist bis auf die 
erwähnten Merkmale identisch 
geblieben. Da Jer neue Check- 
summer jedoch in einem anderen 
Bereich liegt (4097 bis 4287) än- 
dert sich der Basicanfang sowie 
die Checksummer-Startadresse. 
Die neue Startadresse lautet nun 
SYS 4097. Vor einem LOAD 
bzw. SAVE Befehl sollte der 
Checksummer jedoch weiterhin 
mit SYS 62158:5Y$ 33047 abge- 
schaltet werden. 


Da der Checksummer den Bası- 
vanfang versetzt, stehen dem An- 
wender 255 Bytes weniger Spei- 
cher zur Verfügung, In der Regel 
macht sich dies jedoch nicht nach- 
teilig bemerkbar, da selten der ge- 
samte Speicher benötigt wird. 
Soltte dies jedoch einmal vorkom- 
men, so sollte man das Programın 
nach der Eingabe mittels Check- 
summer abspeichern, danach den 
RESET-Taster betätigen und das 
Programm wieder einladen. Jetzt 
kann das Programm ohne Proble- 
me gestartet werden. 


Achtung ! 


Wenn Sie den neuen Checksum- 
mier eingegeben haben, so sollten 
Sie diesen unbedingt vor einem 
Start abspeichern, da er sich auto- 
matisch löscht.. Um den Check: 
summer möglichst fehlerfrei ein- 
geben zu können, sollten Sie den 
alten Checksummer benutzen. 


Für alle, die nicht gerne abtippen, 
ist der Checksummer unter fol- 
gender Bestellnummer zu be- 
ziehen: 


OV 20K Kassette 10 DM 
OY 20 D Diskette 15 DM 


Die alte Version OV10 ist nicht 
mehr’ erhältlich. 


Frank Brall 


checksummer 


U-16 LISCING + CHECKSUMMEN {DE Vi.8) 


REN WERURRKENUEN EUER EHUU NEUERE 

REM * 

REM C1i& CHECKSUMMER 0Y 2.0 » 

REM * 

REN COPYRIGHT BY FRANK BRALL «* 

REM * 

REM iC) 15.12.86 TRONIC VERLAB #* 

REN * 

REN wuennn nn EHEN HERR 

18 DIM H(75) 

28 PRINT" ICLEAR DOHN SPACEF# HE {SPACEFCHECKSUMMER 
CSPACEIOVISPACEY2. BISPACEIRRRLSPACEIELS/PLUS/A” 
38 PRINT" {SPACESI (2) ISPAGE3 FRANK SPACE? BRALL{SPA 
CEIAFBT ISPACEI/LSPACEISONTRA" 

43 PRINT 

s@ PRINT"CHECKSUMMERTSFPACEIEINTSPACEI= TSPACEISVS 
tSPACEIADF?" 

&8 PRINT"ECHECKSUMNER LSPACEI AUSTSPACEI=TSPACEI SYS 
XSPACEIA21SGO:SYSISPACE} E}SSBA7" 

78 FRINT=PRINT" {SPAGEZFACHTUNGLSPACE) ! ULSPACE>VOR 
{SPACE} DPEMISPALEMLADENISPALEIÜODER" 

88 PRINT"XSPACE3YSPEICHERN{SPACE >VON{SPALEIPROGR 
@MMEN{SPACEIIST{SPACEIDER" 

28 PRINT" {SPALEFFCHECKSUMMER {SPACE HAUBZUSCHALTEN 
TSPACEY!" 

1d8 PRINT:FRINF"BITTELSPACE3BEACHTENISPACEISIEIS 
PACEFAUCHLSPACEIDIE LSPAGE IUINWEISE" 

118 PRENT"YINTSPACE}DENTSPACE} HEFTENISPAGEICONPUT 
E SPACE IMIT , TSPACEIEUMRUTRONIC" 

128 PRINT"SOWIE IEISPACE YDEN{SPALCEIAKTUELLENTSPAGEI 
SDNDERHEF FENTSPACER N" 

138 PRINT"DIESERTSPALEICHECKSUMMERTSPAGEITSTISPA 
CEIVOLLISPACEIKOMFATIBEL” 

148 FRINT"ZUR(SPACEIVERSIDNTSPACEIL.B, SSPALEYERL 
AUBT{SPACE}Y JEDOCH" 

158 PRINT" ZUSAETZLICHLSPACEIDASTSPACEINACHLADENT 
SPACE 3 VONTSPALCEIPRÜBRAMMEN" 

1708 PRINT:FRINT 

289 PRINT"HABEN!SPACEISIELSFACEIDENISPATE CHECKS 
UMMER<SPACEIGESFEICHERT {SPACE} 7?" 

218 GET zIF E$="" THEN Z18 

228 IF E$="N” THEN FRINT"DANNISPATEISAVENLSPACE) 
SIE{SPALEIIHN{SFACEIJETZTISPACE} "STOP 

18890 PRINT"RITTETISPALEIWARTENTSPACEI I" 

sauRd FÜORI=-BTOF 

EB Hi4B+DI=TeHt&5+ Tears NEXT 

&M2B FORI= 4977 TO 4287 sREADAF 

EEE H=ASCLLEFTELIAF, 19) 

HB L=ASCLRICHTFLAS, LI) 

AB DeHiH)#164H TIL): 5=5+DIPOKEI,D 

EA Ars IFALZBTHENNEXT:A=-1 

68878 READY: Z=Z+13 IFV=STHENABBBS 

600888 FRINT"DATRFEHLERTSPACE}Y TNESPATESZEILETSPAC 
E)1"56N20Q+Z:END . 

60385 IFA<SBTHENSAIEB 

60898 5-B:A=U:NEKT a 

62198 PRINT"ICLEARIPOKETSPACEIA4 ,17EPOKELSPACEIL 
7"256,8:NEW:" 

Br PRINT" XDRHNZICHECKSUMMERTSPACEI ISTISPALEIE 
INGELESEN{SPACE} ih 

50128 FRINT" tDONN?STARTISPACEIMET: KSPACEZISYIISL 
ACEIABT?F" 

sul POKkE 239,ZrFOKE 1319,19: PODKE 1320 ,13:END 
Hmzar DATA A9 ,0C,00,62.8%, #9,10,BD,03, 03,68,A2,F 
F,8B6,3A,20,5A,09,86,3B, 1815 
69292 DATA 84,30,28,73.,84 ,AA,FD 
q, 20,77,04, 3C,D7,ER,28, 2B18 
HM2B3 DATA SE, gE,2@, 53,07,84 ‚08,49,29,8D, PR, 12,8 
D,BC,10,BR,AD, 18, 14,05, 1992 

60294 DATA 14,65,45,80,RD,18,ABd,FF, ca, 81,35B,F8,2 
C,c9,22,08,0A,AD,BR,10, 2452 

+a205 DATA 49,81 ,8D,BB,1@,E1,3B,AE,EB,18,0D9,.04,C 
7,28,F8,E4,EE,BC,18,AE, 2562 

TH DATA BC,18,18,81,3B,5D ‚BD,18,ED, 20D,19,CA,D 
0,F4,3£6,45,18,07,RBC,ED, 2437 

48297 DATA 80,0C,99,BE,8D, 24 ,BC,AF,00,AhE,BD, 19,8 
5,62.96,63,92,90,38,28, 1954 

60288 DATA CE,A2,20,71,44,20, 74,9B,20; 4E,9C,A2, 8 
3,08,60,20,D9,24,09,00, 29044 

40297 DATA 90,99,AC,CA,BA,2@ .F4,69, bn,EB,08,FQ,8 
&,90,02,8C, CA,De, FA,BG, 2545 

aazıa DATA FF ,AIC,S6 ‚87,009,00,00,00,80 ‚ER,CD, 352 
ENDE DES LIST INGS 


SOweVaun®- 





FO,EF,90,07,28,53,8 
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Beschreibung: 
Mit Hilfe des SUPER-LIST wird 


der LIST Command des Systems 


entscheidend verbessert, Nach In- 
stallation des Programmes stehen 
zusätzlich weitere 5 Funktionen 
zur Verfügung. 


LIST T=Listee eine Bild- 
schirmseite ab. Pro- 
grammanfang. 

LIST B=Listet eine Bild 
schirmseite ab Pro- 
grammende. 


LISTD=Liset eine Bild- 
schirmseite ab letzter 
Zeile des aktuellen 
Bildschirms in Rich- 


tung Programmende. 


LIST U» Listet eine Bikd- 
schirmseite ab erster 
Zeile des aktuellen 
Bildschirms in Rich- 
tun Programm- 
ie (Mit Funk 
tion D und U kann 
außerdem eine Zahl 
mitgegeben werden, 
Um diesen Wert wird 
dann vor bzw. zu- 


rückgeblättert.) 


LISFM = Programm Merge. 
Mit diesem Befehl 
können zum z.Z. im 
Speicher befindlichen 
Programm weitere 
BASIC-Programme 
hinzugeladen werden. 


Die Programme wer- 
den immer hinten an- 
gehängt, Die Zeilen- 
nummern sollten grö- 
ßer als die des im 
Speicher befindlichen 
Programmes sein. Ist 
dies nicht der Fall, 
muß das Programm 
nach dem Merge neu 
durchnumeniert 
werden. 


Beispiel; 


LIST MHUGO",8 


Das Programm HU- 
GO wird von Dis- 
kette zugeladen. Die 
Geräteadresse kann 
kei der Installation 
fest vorgegeben wer- 
den und kann somit 
weggelassen werden. 


Installation: 


Zur Installation sind zwei Pro- 
gramme notwendig. Da das Pro- 
gramm am Anfang des Basic- 
speichers läuft, muß dieser Platz 
vor dem Laden des Programms 
reservierr werden. Dies wird 
durch das höherlegen des Basic- 
anfangs gemacht. 


Das erste Programm erledigt dies. 


Das zweite Programm ist ein DA- 
TA Lader, die eigentliche Routine 
ist in DATA Zeilen abgelegt und 
wird mit diesem Programm an 
die richtige Stelle gepoket. Da- 
nach ist die erweiterte LIST 
Funktion aktiv, 


Um das Programm schneller Ia- 
den zu können, sollte es nun als 
Maschinenprogramm mit dem 
Monitor gesichert werden. 


Kassettenbenutzer sollten vor 
dem Sichern ein Ladeprogramm 
zum komfortablen Laden legen. 
Ein Beispiel ist im DATA-Lader 
von 

Zeile 192 bis Zeile 202 
beschrieben. 


Die Geräteadresse wird in Zeile 
160 bestimmt. 


Vorgehensweise: 
t. Rechner aus und anschalten. 
2. Band in Kassette einlegen. 


3, LOAD eintippen und RE- 
TURN drücken, 


4. RUN eintippen und RE- 
TURN drücken. 

5, LOAD und RETURN. 

5a. Geräteadrese festlegen, 
falls gewünscht. Zeile 160 
DATA-Lader. 

%. RUN und RETURN. 

7, SUPER-LIST ist aktiv. 


8. SUPER-LIST Lader er- 


stellen, 

Beispiel im DATA 
ler 

Zeile 192-202, 


9, Lader auf Band oder Dis 
kette sichern. 


10. Maschinencode mit Moni- 
tor sichern. S°SUPER- 
LIST1.1*,1,1000,11FA 


11. SUPER-LIST kann nun be- 
nutzt werden. 


Nun viel Spaß mit SUPER-LIST. 
Nach dem Drücken des RESET- 
Knopfes muß SUPER-LIST so- 
fort mit SYS4096-+6 neu gestartet 
werden, weil sonst das Programm 
zerstört wird und neu geladen 
werden muß. 


programme. 


ST 


Für Spezis: 

Die Routine wird in den BASIC 
Warmstart eingeklinkt. ($302, 
$303). Die ersten drei Bytes ab 
$1000 wurden mit 800 freigehal- 
ten um ein RESET: zu ermögli- 
chen ohne die Routine zu er- 
stören. 


Auf $1000 steht ein JMP-Befehl. 
Hier könnte ein [MP eingebaut 
werden um evtl. noch andere 
BASIC-Warmstartroutinen abzu- 
halndeln. Danach den auf $1003 
stehenden JMP ausführen: 


Die Routine ist auch für andere 
Speicherlocationen erhältlich: 

In diesem Fall müßte vom Autor 
eine entsprechende Version ange- 
fordert werden. 


Die Zeropageadressen SDO - 
$5D7 (Sprachsynthesizer) werden 
als Workbereich benutzt, - 


Nachsatz:  ! 
Wenn man sich nun noch die 
ESC-Tastenfunktionen im Hand- 
buch anschaut und diese auch be- 
nutzt, so hat man auch auf einem 
C16 einen recht passablen Editor. 


Zum Beispiel 

ESC 1 schlägt. eine Zeile frei. 
Ein Fenster muß nicht unbedingt 
eingerichter werden. 


C-1& LISTINGS + CHECKSUMMEN (ac Vi1.0r 











10 REM rm HRIEHE <121> 
15 REM # SUPER-LIST VORPROSRAMM <35> 
16: REM 6 mm men <AaB> 
3@ REM # <1> 
4B REM #BASIC ANFANG HÜICHSETZEN <2359> 
50 REM # <21> 
68 REM # <31> 
65 PRINT" tCLEARYBITTETSPACEITEILTSPACEIZISPATEI.. 
ADENISPAGEIN“ <194> 
7a I=DEC("11FF") i <234> 
890 POKEA3,8: POKE44 ‚18: PDKEI „Bı NEW <1135> 

ENDE DES LISTINGS 

E[DRUCK:F.B.7/0.8.1 

C-i& LISTING + CHECKSUMMEN {DE v1.22 
12 REM BBRRRBRRRERRRHÄH HIHI NHIHE <121> 
12 .REM # SUPER-LIST <235> 
14 REM = * <111> 
165 REM # {DI ı RUDI ROSE * <113> 
18 REM # SCHULSTR. 53 * <ıad> 
22 REN # SaB2 WEDEMARK 1 * <41> 
22 REM # TEL. 85139/5284 # <75> 
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programme 














22 REM Ver <221> 198 z <248> 
25 REM # SUPERLIST DATALADER * <55> 192 REM I=DECL"I1RF") <160> 
28 REM * * <125> 174 REM PRINT" CLEARIP{SOY43,BrP{52744, 18: P1SOY1 

Sq REM * ACHTUNG: VOR DEM LADEN ® «2337 ‚3: NEW" <237> 
32 REM * DIESES PRÜGRAMIEB * <ı18> 17& REM PRINT" {DOHN2HL{SDI "+CHRE SA) +"SUPERLISTI 

354 REM # BASICSTART HOCH- = <221> „L"+CHRE ZA) 4", 1,1" <847 
356 REM # SETZEN %# <161> 178 REM PRINT" {DOWN ISYS4B9ht5: NEW" <33> 
38 REM #I=DEC{"11FF") <47> 222 REM POKE331Y9,19ı1 POKE1328, 13: POKEIS321, 13:5 POKE 

48 REM #POKE4S ,B:POKE44 „1E: POKET ‚RB: NEW <17&6> 1322,13: PDKE23?,4 <162> 
42 REM Venen ER <239> | 202 : <4> 
Be <182> | 284 REM------ mm <283> 
4b tr x104> | 296 REM # MASCHINENPROBRAMM <284> 
28 REM Beh *2457 | S@aQ DATABB,29,09,9C,25,18,42,03,BE,02,03 <247> 
58 REM * * «147> 310 DATRA2,12,8£.03,.03,49,12,05,2C,85,2E 282> 
52 REM # <23> 328 DATABS,38,85,32,408,53,20,40,31,2E,31 <a9> 
54 REM * FUNKTIONEN: <1ı27> | 330 DATARB,22,00,00,00,EA,AZ,FF,94,3A,20 <809> 
56 REM # LIST T = LIST AB PROGANFANG <212> | 349 DATASA,EB,B4,3B,84,3C,29,73,09,AA,Fö <125> 
59 REM *# LIST B = LIST PROGSRAMMENDE <198> 358 DATAEF ‚78,20D,208,55,87,29,79,84,09,7B <2187 
&B.REM #* LIST D = LIST RICHTUNG PRO %239> 369 DATAFO,B6,AC,F0,10,4C,2E,87,85,09,29 <1> 
62 REM # BRAMMENDE <241?> | 378 DATA197,11,29,73,04,09,54,D8,09,20,09 <a2> 
49 REM * LIST U = LIST RICHTUNG PRO- <1854> | 308 DATA1L1,24,68,11,9C,F6,18,C07,42,08,33 <25> 
66 REM * PROGRAMMANFANG 327 378 DATA28,07,11,RA6,2B,84,5F ‚Ab,20,86,68 <243> 
68 REM * BEI U UND D KOENNEN <253> A402 DATAAQ,01,23,D1,84,08,04,98,20,01,94 x24> 
7a REM + ZUSAETZLICH SPRUNGWEITEN 2977 410 DATAFB,BE ,EE,25,10,0D8,803,EE,22,10,28 <238> 
72 REM # ANGEGEREN WERDEN <41> 428 DATAS1,11,4C,4€,10,A2,198,086,05,28,94 <i69> 
74 REM # . Z.B. LIST D 18 <136> | 430 DATA11,29,44,11,4C,F6,10,609,94,08,22 <h2> 
76 REM # LISTM = PROGRAMM MERGE <219> | 440 DATAZ8,73,84,F9,17,2B,3E,BE,20,BC,11 <198> 
78 REM » MIT DIESER FUNKTION <117> | 450 DATARS,14,18,60,23,18,680,23,10,99,28 <131> 
80 REM # KOENNEN AN DAS GE- <258> | 448 DATALD,22,18,580,22,10,28,48,11,AC,F& <16B> 
B2 REM * LADENE PROBRAMM <33> 478 DATA128,C7,55,D2,21,29,BC,11,208,73,83 <182> 
B4 REM # WEITERE ZUGELADEN <221> | 488 DATAFG,0C,29,3E,8E,45,14,85,05,28,R4 <158> 
B& REM # WERDEN . <£215> | 49B DATA11,0D0,07,AB,15,84,.05,28,A4,11,28 <a> 
88 REM «= Z.B. LISTM"HUGO",i <57> SO DATASB,11,9C0,F6,190,09,40,00,85,20,73 <ı170> 
Fa REM = x61> 510 DATAQ4,4C,D2,11,20,22,11,R5,08,46,D7 <10> 
92 REM * * <189> | 528 DATABB,AC,93,87,R9,93,28,D2,FF,AC,22 <3> 
FA REM * DAS PRÜGRAMM LAEUFT IM * <254> \ 538 DATA1B,86,24,19,AC,23,18,80,25,18,04 <a1> 
26 REM # BASIC SPEICHER AB 1928 # <7> 540 DATACD,CB,16,10,€6,20,2B,11,29,430,08 <92> 
FB REM » : * <195> | SS5@ DATAZ9,51,11,4C,97,11,A5,3B,85,01,A5 <289> 
108 REM # FOLGENDE PARAMETER GIND ZU # ‚s105> | 560 DATA3C,S5,02,69,05,D1,95,3B8,A5,D2,85 <117> 
182 REM #* VERSORGEN: * <9> 378 DATASE ,S9,AB,21.28,D1,94,09,06,28,28 <9B> 
1084 REM # GERAETEADRESSE >» ®* <152> | 588 DATAD1,243,F2,16,29,3E,780,EE,23,10,D8 <205> 
106 REM = 1 = TAFE NORM ® <11@> | 570 DATABS,EE,22,19,08,82,28,D1,84,AN,C8 <17> 
188 REM = 7 = SUPERTAPE # <95> | 608 DATAZB,D1,94,598,AC,FS,10,0%0,BR,20,Di <iae> 
418 REM * 8 = DISK * <14> 618 DATAB4 ‚AA,CE,2B,D1,84,06,5F,85,48,42 <189> 
112 REM # <B3> 628 DATAA&,2B,85,58 ‚A6,2C,86,49,02,08,86 <178> 
114 REM # <B5> 638 DATADS,05,54,4C,77,11,E5,D4,00,02,E& <i11B> 
15 REM # <87> 648 DATADS,AD,22,18,C3,03,F@,13,28,51,11 <142> 
118 REM * <87> 658 DATAAB,B1,20,D1 ,94,00,04,88,29,01,84 <19> 
120 REM Ver <sl> 668 DATAFU,BB,4C,71,11,60,23,198,05,04,08 «238> 
122 : 4 <18B> | 672 DATRES,69,A5,D3,80,22,14,A5,D4,80,23 <194> 
124 : <182> | &8R DATALD,69,A6,05,40,23,18,F0,05,CE,23 <174> 
128 : <186> | 490 DATA1B,DB,B0,AD,22,10,F0,84,LE,22,10 <34> 
158 PRINT" CLEARISUPERLISTISPAGEIWIRDISFACEIAKTI 720 DATACA,DB,F@,48,AbC,24,.18,BC,22,10,AC «87> 
VIERT .- <76> | 718 DATA25,19,86,253,18,68,62,08,BE,22,10 <91> 
132 Prerur" CBOUN4 RIGHT43BITVEISPALCEINLUINISPACEIMI 729 DATABE,23,18,62,20,58,A8,AD,21,10,07 <iB8> 
TISPATEIDEMTSPATEIMBNI TORTSFACEISICHERN ' <234> | 730 DATABG,FB,„92,85,AE,38,A5,2D,E9,02,RA <1h> 
1354 PRINT" CDOWNZ RIGHT4}S"+CHRS$ (34) "SUPER-LISTI. 7408 DATANS,2E,E9,00,48,99,88,28,D5,FF,28 <151> 
L"+CHRF (34) " „1, 1OBQ,11FA" «277 750 DATAiS,88,28,4B,88,20,93,8A,4C0,85,87 523 
136 3 194) ENDE DES LISTINGS z 

137 REM SHIFT PROGRAMM TO RUN LOCATION <101> 

138 : 196> 5 

148 FOR ADR=-489& TO 44D1 <157> oe 

142 READ CR$:POKE ADR,DECtERF$) <184> ® 
144 NEXT ADR <16B> R grammiragen: 
145 ı x204> i 

14B REM--——----— Anm rnemnnnnn <1978> 

1589 REM STORE GERAETEADRESSE B=VARTABEL <2> ! B i 
152 REM 1=TAPE «1523 

153 REM 7=-SUPERTAPE <192> RS 

155 REM 8=DIEK <2U6> 

158 r <2157> 

169 POKE4894+33,8 ıREM GA VARIABEL <187> |) ® 

182 ı Fe r <220> : 
a ıift weiter 

166 REM #FUNKTIONSTASTENBELEGUNG <128> 

169 3 <226?> \ 

178 KEY1J"LISIID"+CHRF 13) <208> 

172 KEYB,"LISI>U"+ERRE (IT) <79> r 2 B 

174 2 «2327 

176 REM -——-—----—-- - mm <b6> Montag-Freitag, 1 A - 1 6 Uhr 
178 SYS4894+6: NEW FREM INIT SUPERLIST <10&> 

188 REM —---------- -umeu nn xZ11> p 


182 REM FOLGENDE ZEILEN NACH SICHERN <17> . ; 
184 REM DES MASCHINENPRGERAMMS <31> ; 

19& REM AKTIVIEREN <138> 

198 x <246> 


5187 Compute mib 19 






































Programme 


MARBLE 


Weg, die die rote Kugel bei Be- 
rührung an den Ausgangspunkt 
zurückversetzt. Sisyphus läßt grü- 
Ben! Ein Spiel für Nervenstarke 
mit einer ruhigen Hand! 
Hoffentlich besitzen $ie einen 
präzisen Joystick! 








Kugel verrückt! 
Das wurde aber auch Zeit, daß ei- 


ne Version dieses Geschicklich- 
keitsspiels für den C16/116(64k)/ 
plus4 erscheint. Selbstverständ- 
lich kanın diese Variante nicht mit 
seinen berühmten Vorbildern 
konkurrieren. Dennoch hat 
“Marble“ es in sich, 

Der Spieler führt die rote Kugel 
mit dem Joystick über den schma- 
len Grat der Bahn - rechts und 



















Eingabehinweise: 

Die 3 Teile werden einzeln abge- 
üppt und mit 
SAVE“MARBLE“ (bzw. 
“MARBLE2“ und “MARBLE3") 


links lauert der Abgrund. Und - abgespeichert. 
die Zeit drängt. Zu allem Über- Diskettenbenutzer hängen an den 
Aluß stelk sich auch noch eine vö- SAVE-Befehl ‚8 an. 


lig unberechenbare Kugel in den Zum Spielbeginn wird der erste 

















C-1& LISTING + CHECKSLRMEN oc Vr.03 
IB REM Usenet EEE EHI <15> 
ZUREM#+MARBLE-MADNESS + <195> 
SB REM en EEE 35? 
48 REM ###+ 1787 BY ANDREAS NIKISCH ar «252> 
50 REM HH RUHR EU x55> 
60 REM ##r# Ciä/C1ib (64K} PLUS 4 were x244> 
74 REM Ra «757 
820 REM #eeuse 1.MAÄRBLE LOADER rununn <125> 
98. REM HeHeRRRHREIHBIIHIEIBINN IE <95> 
100 3 2 <158> 
118 COLOR®,2:C0LOR4,15, 6: COLORI „23 SCNELR <97> 
128 CHAR1,1@,1,"{BLACK FLASHONTMARBLEISPAGEIMADN 
ESS(SPACEZIU-AIGTFLÄSHOFFI" . <81> 
134 PRINT"SHHITE HOME DORNZILOAD"+CHRF (IA FH MARB m 
LE2"+CHR$ (34) +" „"PEEK 17)" CHOHEI" JR <218> 
148 POKE1319, 1351 POKE1328,82: POKE1S?1 213 <81> 
15@ POKE1I3Z2,13:POKE239,4 | x188> 
168 POKEA3,11:POKE44 „32:1 POKE8192 „Br NEW <154> 
170 = f «228> 
1B9 REM SHHHRH <255> 
179 REM “+ 1. TEIL ENDE #rr <134> 
2B8 REM Marsa EN <19> 

ENDE DES LISTINGS 

Ge16 LISTIND + CHECKSUMFIEN cc v1.0) 
10 REM wnuununannnuuenn une <185> 
za REM wumatau EINLESEPROGRANMM Hanna“ <147> 
zn REM ent E x285> 
AG REM «nenne WRITTEN 1987 BY ununne <235> 
za REM wa <225> 
60 REM o#unne ANDREAS NIKISCH weinen 123543 
70 REM EEE <245> 
BO REM wenn CI6/CLIH/FLUS 43 met <125> 
a REM BRRHR ee <9 
ı1aB a % <158> 
118 SCNLLRAPRINT"IDOHN FLASHON WHITE SPACEIBIFTE 
LSPACEIWÄRTENLSPACE?  {SPACEIDATENTSPALEIWERNENS 
PÄCEFEINGBELESEN{FLASHOFFF" <41> 
128 COLORB,1,COLOR4,1:C0L0R1,2 <141> 
130 PIKE63302 ,Bi 1 POKESSIRS,9S <52> 
148 PRINTCHRS (1AZICHREF (8) s ZN=278 <210> 
158 DO: :FORY=8707 +239> 
149 READAS: IFAF="AN"THEN24B <183> 
1798 A=DEC tA$) SPR«PR+A 292 
182 POKEABIE+K,A . <au> 
199 X=X+11NEXTV } *207> 
208 READRP$:RP=DEC (RPS} <130> 
218 IFPR<>RFTHENPRINT"{DOHN WHITE SPACEIPRUEFSUN 
MENFEHLERISPACEI INTSPACE} 4 "INGEND <173> 






Teil geladen und mit RUN gestar- 
tet. Die anderen Teile werden 
dann automatisch nachgeladen. 
Dabei ist es unerheblich, von wel- 
chem Massenspeicher (Datasette, 
Diskette mit Adresse 9 oder 8) 
nachgeladen werden muß, er darf 
nur nicht innerhalb der 3 Pro- 
grammteile wechseln. Das Pro- 
gramm erkennt automatisch, auf 
welche Adresse es zugreifen muß. 
Dies ist unserer Ansicht nach 


günstigste Methode, Programme 
für unsere Leser, die ja mit ver- 
chiedenen Datenträgern umge- 
hen, zu veröffentlichen. Unsere 
Programmautoren sind daher auf- 
gerufen, sich diese Methode ge- 


nauer anzusehen. 


Im einzelnen sei verraten, daß die 
Adresse 17 abgefragt wird, ın der 
die zuletzt benutzte Geräteadress 
gespeichert ist. 





228 PR=B: ZN=ZN+i® 
2358 LODP 
248 FORX=SSGABT03A3II1READAS: POKEX ‚DEC (AR) 1NEXTISC 



















































NELRS 20> 
241 PRINT"{BLACEK HOHE DOHN2HLOAD"+EHRFTTAI+"MARB 
LES"+CHR& (34) +" „"PEEK(1LF7A)"CHOHEI "JE z «2r 
242 POKE 1319,13:POKE 1329,892ıP0OKE 1321 ,213:P0OKE 

1322, 131 P0KE239 „Ar NEW <193> 
258 DATA 30,42,BR,A1,#1,8D,42,30,93B8 <i19B8> 
z&4 DATA 81,B0,B0,81,70,7D,9D,FF,8552 x259> 
278 DATA 83,BD,BD,83,.90,9D,83,FF,B53C “97> 
ZB DATA 81,BD,BF,IF ,9F,70,81,FF,8558 x85> 
294 DATA 83,RD,BD,9D,9D,9D,83,FF,8556 <13> 
3@8 DATA 81 ,RF,BF,83,9F ‚FF ,81,FF,2598 <166> 
318 DATA E1,BF ,BF,B3,9F ,9F,9F,FF,@SSE <259> 
328 DATA B1,BD,BF,77,70,9D,B1,FF 255 <219> 
330 DATA BD,BO,BD,B1,9D,9D,9D,FF,„@58E <13> 
348 DATA EF,EF,EF,EF,E7,E7,E7,FF,8778 <92> 
356 DATA FB,FB,FB,F3,B3,83,8B3,FF,BAcc <1989> 
34® DATA B9,BS,97 ,8F,87,73,79, FF „09554 <248> 
37a DATA BE,BF,BF,FF IF 898 „Bi ,FF,857A <157> 
388. DATA BD,99,45,7D0,9D, 90,90 ,FF ‚BS6E <248> 
370 DATA BD,90,AD,975,97,90,9D,FF ‚BSöE <114> 
ABB DATA B1,PD,PD,9D,9D,9D,Bi4FF „8352: <215> 
418 DATR 81 ,BD,BD,81,9F ,98 ,9 ‚FF ,B539 <175> 
428 DATA 91 ,BD,BD,7D,75,99,81,FE,9535 <1903> 
434 .DATA 01,RD,RD,81,8F,97,97,FF ,855A <99> 
448 DAIA' Bi ,BF,BF,E1,F9,F9,8i,FF,85F2 <59> 
458 DATA Bi,EF,EF ,E7,E7,E7,E7,FF,B&GFA <41> 
468 DATA BD,PN,AD,3D,90,70,81,FF,BSBE <219> 
470 DATA BD,BD,„BD,9D,90,CB,E7,FF,0622 <57> 
ABB DATA B9,6B9,B9,897,95,77,BD,FF,BS0E <129> 
498 DATA 8D,BD,DB,E7,E7,CB,9D,90,0428 <140> 
so@ DATA BD,AD,BD,81 ,E7,E7,E7,FF,@64C <b> 
Ssıa Data 81,F9,F3,E7,CF,9F,81,FF,0642 <835> 
52@ DATA 30,30,30,30,39,30,3C,00,0168 <119> 
53@ DATA 80,12,30,7C0,39,62,FC,08,2258 <95> 
542 DATA 3C,2C,8C,B6,06,00,3C0,08,0084 <27> 
550 DATA 00,18,36,7E,18,18,18,19,8132 <223> 
569 DATA 00,10,38,7F ,7F,30,18,2B,217E <234> 
578 DATA 00,90,20,209,00,08,00,20, 2000 <79> 
SRB DATA 18,19,18,18,08,00,18,20,0078 <203> 
5IB DATA 665,66,64,88,08,00,00,08,0132 <210> 
saR DATA bb,hb,FF,&b,FF sb 8,66, UB,DIFC <2A3> 
&i0 DATA 18,7E,69,36,06,70,18,098,d187 <88> 
62@ DATA 88,C0,E0,F@,F8,FC4FE,FF,9781 <87> 
630 DATA FF,7F,SFsiF,@F,07,03,01,01F& <225> 
640 DATA 21,03,87,BF,1F,3F,7F,FF,MIF& <157> 
658 DATA FF,FE,FC,FB,F2,EB,CB,04,0785 <77> 
559 DATA 38,18,0C0,66,00,19,39,200,2084 <217> 
&70 DATA WB,66,3C,FF,3C0,66,00,00,0243 <280> 
489 DATA RB,18,18,7E,18,18,08,20,BRDE <67> 
4998 DATA FF ,FF,FF,FFFF,FF,FF,FF,@7FEO <188> 
708 DATA 09,09,R0,7E,20,09,00,00,087E <63> 





programme 





719 DATA FF,FF,FF,FF,FF,FF,FF,FF,B7F8 <zug> | 1570 DATA 09,00,40,40,48,40,430,48,0168 <170> 
720 DATA 99,83,84,8C,19,30,60.,90,@0BD <126> | 15BW DATA 94,06,26,06,06,06,05,04,BD358 “337 
738 DATA 91 ,39,B5,80D,90,90,81,FF,B536 <138> | 157@ DATA 48,49,49,40,30,48,490,48,0200 <21> 
748 DATA ER „Er ,EF,E7,E?,E7,E7,FF,376B <251> | 1600 DATA B5,06,56,4A,4R,55,02,00,8:BB “22 
75B DATA Bl,FD,FD,81,9F,9F,81,FF,B5RA <220> | 1418 DATA 40,40,54,04,03,54,00,09,927@ “1277 
762 DATA 81 ,FD,FD,C1,F9,F9,B1,FF,BöRE <184> | 1620 DATA 00,00,05,1R,6R,65,64,59 ,D1f6 <208> 
77a DATA BF ,BF,BF,B3,B1,F9,F9,FF,B66B <a3> | 1630 DATA OR,00,40,99,44,64,64,64,02A0 <154> 
788 DATA 81,BF,BF,81,#9,F97,81,FF,85F2 <135> 1443 DATA 22,0: +81,06,06,19,17,69 ,B0AR <113> 
790 DATA 81 ,BD,BF,81,90,7D,B1,FF,8538 <248> 1558 DATA 64,94,90,70,40,44,.20,00,B2A8 A973 
828 DATA 81,F9,F3,E7,E7,E7,E7,Ff,8708 <75> 1658 DATA 64,69,55,5A,4N,55,20,08,025& <x192> 
818 DATA 81,BD,BD,81,90,9D,81,FF,9536 <192> | 1670 DATA 80,00,54,44,99,54,0D,2D,B1Fß Re 
820 DATA Bi ,BD,BD.B1,F9,F97.01,FF.@SEE <157> | 1680 DATA 99,00,55,4A4,44,65,64,54,8246 <18> 
830 DATA 08,09, 18,22,0D,18,00,08,0038 iss» | SER DATR N SR SIT O I Sn eDE EEE 
848 DATA Da,BDd, 18,00,0n,18,18.,30,00878 <252> 1700 DATA BB,01 ‚26 ,U6,24,25,08,08,0018 249) 
a59 DATA @E,19,30,68,359,18,@E,Ad,A1aC 252> 1718 DATA: 44,A4,70,40,70,94,64,64,83D4 <82> 
848 DATA aR,ng,7E,00,7E,00,82,08,80FC <ı47> | 1728 DATA 54,64 ,65,6A,1A,05,80,08,81A6& <148> 
N 872 DATA 70,18,00,05,0C,18,70,00,012E <176> | 1730 DATA 64,64,64,24,70,48,00,B0,82AB <b> 
N 882 DATA 3C,66,86,0C,19,29,19,00,00E4 35} 1749 DATA 2B,09,54,654,63,64,64,54,0248 <377 
| E92 DATA SC.76,F3,FF FF FF, 7E,SC, 0550 <231> | 1750 DATA 64,64,64,65,64,49,55, BD, B2BA <226> 
900 DATA SE.6E.E7\FF\FFFFIE,SC.0548 “> 174M DATA 54,64,64,64,A9,93,64 64, 8398 <161> 
910 DATA 30.56,AB,DS,AB,DS.64N, 30.0438 <159> | 177@ DATA 64,69 ,64,64,64,54,B8,00,0240 <218> 
220 DATA 3C,42,81,01,81,B1,42,30, 8328 <171> | 1788 DATA 29,09,55,6A,&R,45,64,64,0256 Naar 
938 DAT& 81,84,19,49,40,10,04,01,2@An «1335 | 1770 DATA BB,00,59,n9,R9,64,64,54,82B8 En 
949 DATA 48,10,04,01 01,04, 12.20 ,nunA <143> | !520 DATA 64,64,67,6R, 1,26, 1 ,QB,@IBO Se 
958 DATA 7D,1D0,05,81,01,04,10,40,B0F5 <14e> | 1010 DATA 09,00.00,40,76,A1,A4,69,027C BEER 
760 DATA 47,19,05,01,01,84,12,42,@BDD <172> | 1928 DATA 54,69,65,4N,19,05,08,08 ,B1A& Ser 
978 DATA FO,FD,FD,FD,7D,1D,05,81,08994 <216> | 1838 DATA 64,64,64,69,70,4B,20,08,B208 
FOR DATA A9,A7,N7,99,69,17,05,01,032C <113> 1848 DATA B9,900,05,05,19,19,69,69,0111 +250> 
990 DATA FDF9,D0,40,40,10,04 01.0356 €230> | 1858 DATA BB,00,40,40,40,49,20,200,81a0 m, 
10AQ DATA A9,n4,90,408,40,10,84,01,8272 <5> 1868 DATA 65,64,64,65,6N,54,69,69,0333 Sr 
1R1a DATA FO,FD,FD,FO,FD,F4,DO,8,B6F5 aus) | MEZ SDATA De BB TR N EN ac 2 
1828 DATA A9,09,A9,09,n9,04,90,48,G4C1 <ımı> | 1BE@ DATA 64,64,67,64,14,05,02,08,01BA Be 
1930 DATA 48,10,94,01,01,05,1D,7D,DArS aan | 1000 DO ENsEN  tn Be 
1940 DATA 40,10,84,81,81,85,19,67,BBDD cars | Lem DATE a ea te a 
185@ DATA B1,85,1D,7D,FD,FD,FD,FD,8494 <inm> | 710 DUO ML REISE RE Eee Zn S 
1042 DATA B1,05,17,69,49,89,49,09 ,BSZC <187> | 1728 DATA OW,@1 83 96,08, 1R,19,.17 „BRISR 1772 
1078 DATA 81,84,19,48,49,DQ,F4,F0,0356 <145> | 1730 DATA 64,94,90,90,40,98,00,00,D2Ad S7a2 
1282 DATA M1,04,19,49,40,90,04,47,9272 <170> | 2740 DATA. 19,17,19519,19,15,00,00,0072 «127 
1074 DATA 49,08,F4,FD,FD,FD,FD,FD,BAFS <ı38> | 1750 DATA 29,00,05,1A,69,65,64,64,01B6 <78> 
1180 DATA 49,98,A4,A9,A9,997,99,A9 ,BAC1 <176> | 1960 DATA 90,09,49,98,R9,64,64,64,B2AB <229> 
111@ DATA FD,FD,FDyFD,FÖ,FD,FD,FD,B7EB 3 <192> | 1978 DATA 45,6N,1A,85, 1R,65A,65,64,025B <76> 
1128 DATA A7,A7,A7,R7,A9,49,09,49,0548 <198> | 17BB DATA 64,A4,70,40,90,9,64,64,80354 <97> 
11358 DATA @1,84,10,40,48,58,14,10,011& <161> | 1992 DATA 64,64,65, 6R,19,05,09,0 ,O1B& 1737 
1148 DATA 01,04,19,40,49,4B,70,70,@1F5 «237>. Being ade a en er 
1152 DATA 40,48,10,10,04,04 ,01,01,00AA <62> ‚BD,05,1A,64,67,64,69, 
1168 DATA 85,05,01,91,81,04,10,40,0061 Kiw9H | 2778 DATA ULEB TEE AI RALETSDZER > 
1178 DATA F4,F4,FD,FD,FD,FD,FD,FD,87D& <188> ‚2038 DATA 64,69,65A,1A,83,00,00,00,0156 <180> 
1158 DATA @1,04,18,40,40,40,DD,DE,5275 21033 | ZW DAIB EHRORUDES EEE m 
1170 DATA 48,D8,F4,FD,7D,7D,1D,1D,8435 «763 | MR PAIR MLABN BE BE RR RT E21 
1200 DATA FD,FD,FD,FD,7D,7D,1D, 1D,@528 ae |,0o0 DOIN DAR DE EINER SON DE RZEN sur 
1218 DATA 05,05,01,01,01,24,10,42,0061 a le a Da ae nrsce Ber 
1228 DATA 74,13,05,01,01,84,19,48,00E3 <1B1> 
1230 DATA FA,F4,FD,FD,7D, 1D,25,01,0482 CZA7> | ZOR® DAIA AU BALD EUR DE ZUR yet 
1240 DATA 48,19,84,01,01,05,14,64, BBDS LAS | 2100 DIE. DE SEHEN SUR LESEN DE SER ee 
125@ DATA 49,49,47,09,A9,A9 ,A4,A4,B5SSE UBS | ZEIR DRIN BRETT ZRH SC DET ZUSDASDE BR 
1256 DATA 39,58,49,40,498,190,24,01,0175 <ısı> | 2128 DATA 20,84 ,DF,22,04,DF ‚20,04 <179> 
+30,49,430,48,19,24,01, Ss 
| 1270 DATA 81,01,04,04,19,10,40,48,84AA: <254)> | 215B DATA DF,528,84,DF,28,04,DF,28 x2537> 
:1280 DATA 49,10,84,01,01,01 ,06,06, 8863 <131> | 2142 DATA 09,DF,28,09,DF,20,04 ,DF <1157 
1292 DATA 49,07,49,49,A9,09,AR,A4 DISE <237> | 2158 DATA 28,84 ,DF,20,84,DF 20,04 <207> 
13009 DATA 99,90,40,48,40,10,03,01 ,BIFS <128> | 2158 DATA DF,22,94,DF,28,84,DF,28 <11? 
1318 DATA 48,10,.03,01,01,01,05,05,0061 «58> | 2178 DATA @4,DF,29,84,DF,20,04,DF <145> 
132@ DATA 19,19,69,69,A97,997,A9,A9 ,BSAB <132> | 2188 DATA 28,94,Dr,60,0B,02,00,08 <119>2 
1338 DATA 19,14,592,40,48,10,84,B1,@112 <zs4> | 2170 v <209> 
1348 DATA 7D,1D,B5,81,81,904,10,42,0BF5 <20> | 2222 REM “ar# 2.TEIL ENDE wann 1537 
1358 DATA 69,19,95,01,91,24,18,438,0@DD <52> ENDE DES LISTINGS 
1358 DATA 42,10,24,01,01,95,1D,7D,Bars <64> 
1con Darm ZB-IDIES:01 a1 2os-ın moiBıne ae Bin 
1380 DATA 7D,10,85,01,91,25,1D,7D,B14@ <169> 
1390 DATA 69,19,85,81,81,905,1D,7D0,8128 <254> 
1400 DATA 7D,1D,805,81,81,05,17,67,8128 <183> 
1412 DATA 69,19,85,01,01,05,19,49,A11@ <8> C-15 LIBTING + CHEEKSUMMEN (DE Vi.0) 
1422 DATA FD,F4,D08,40,48,08,F4,FD,0602 ...2172> 
1438 DATA A7,R4,90,48,40,08,FA,FD,O3S1E «&6> | 1B REM ra HHAHENHERRHRAHE <15> 
1442 DATA FD,F4,D9,49,40,70,A4,99,BS1E <78> | za REM ##### MARBLE MADNESS C 16 #rirtk <82> 
1459 DATA 99,24,90,40,40,98,94,09,043A <ım1> | ZU REM TRRERHSHEERAHIHHENE ER HSIEIHESEÄAHIHTE <a5> 
1449: DATA 09,00,09.00 ,On,FF,FF,FF,B2FD c64> 48 REM uns WRITTEN 1907 BY A <14> 
F 1478 DATA 03,83,03,035,03,B3,Ff,FF,90218 <117> | Sa REM HH <55> 
14508 DATA 22,20,2090,08,F0,F0,F@,FB,85C8 <161> &8 REM waere ANDREAS NIKISCH By Fr 7 <125> 
1478 DATA BF,&r,ar,ar,o2,02,08.00, gast <249> | 78 REM AHSHHHHRHHRRRSHHRGHHEIHHHHER NEE <75> 
1509 DATA OR,20,05,1A,40,55,64,54,21D& <130> | 80 REM “meer DIs/L116/PLUB 4 &9K wuane Sala, 
1518 DATA 900,00,40,70,04,54,59,694 O2 “3353 98 REM te <95> 
1528 DATA 64,64,64,64,54,64,64,64,0328 <153> | 100 : <158> 
1538 DATA 84,69,64,69,69,64,64,64,0520 <1&3> | 118 PRINTCHR$ (145) CHR$tB} ı POKE239,0 <18997> 
1548 DATA 64,64,45,6N,1A,05,00,00,018& <254> | 120 EDLGRB,1:COLOR4,1:VBLBı FIKEAS287,8 <114> 
| 1558 DATA 64,64,64,A4,90,49 ,08,B0,02A0 <136> | 138 SCNDILRIPOKE6SZE6 „FEEK (65286) AND2IF <195> 
1568 DATA 20,00,81,06,1A,4R,6N,56,014B <158> | 140 POKE633B1 „Br POKE6SSSAZ2,53 <130> 
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22 


programme 


159 POKESSIBS, 72: POKESSIGA ‚AB 2 

152 PIKE65290 ‚2511 POKE65299 ,1& 

178 POKEAS2B6,PEEK (65284) UR&4 

180 PRINT"{DGHNZ BLUE SPACEZ RYSONITIBLACKIKLCH 

PURPLEYKCBLACKIMLBLACK Ci PÜRPLEFTIBLÄCKISKCRVSOE 

F. SPACE RVSOH BLUEIAISPACE BLACKIBIRWSGFE SPACE 

AVSOH BLUEFLLSPACE BLACKIKLRUSOFE SPACE RVSON BL 

VEIZCBLACKIMLRVSOFF, SPACE2 AVSON, BLUEYTISPACEZ B, 

LACKI&" 

198 PRINT"{BLUE SPACEZY ,TGREEN} ,IAVSON £B CM) ,CH 

LUE CG GREEN CH RUSOFF},ZIBLUE} )IBREEN? „„AIBLUEN 

„ GREEN} , „NIBLUE} „GREEN? „(SPACE2 BLUEI „IGREENY, 
13 





























. 

Z2U0 PRINT"{BLUE SPACETI „TGREEN} „uyytBLUEI „IGREEN 
I ,BLUEI „IGREEN) „IBLUE) „CGREEN} ,IBLUE RYSOHISLRY 
SOFF GREEN) ,IBLUE}, (GREEN), BLUE RUSONISCRWSOEE 
GREEN? (CHLUE} „ {GREEN} „{SPACEZ BLUE} IGREENY ARVS, 
OH SPACE BLACKY&" 

Z1@ PRINT"{BLUE SPACETI GREEN) „KtBLUE CH GREEN)I 
„BLUE )IGREEN? „IBLUE RWSONISCRVSOEF GREEN), {BLU 
E} GREEN? „„ BLUE) „GREEN? „SPACE BLUE ,IGREEN 
+,tSPACEZ BLUEI IGREEN} sus" 

22® PRINT"(BLUE SPACEZI TGREENI (SPACE BLUEY {GR 
EEN},„{BLUE> „IGREEN? , „„ BLUE) s TGREEN} „ „XIBLUEI TG 
REEN? „(BLUE RVSONFNIRVSOFF GREENYKABLUEN „IGREEN} 
vTORNGF „AIBLUEN , {GREEN} 5 CORNGI 5%" 

23@ PRINT"IBLUE SPACEFIMGREEN?TSPACE BLUENRXGR 
EEN} „{BLUEIKIGREEN? s(BLUEIRTGREEN? 5 ÜHLUEIRTGREEN 
Far, tBLUEIKCGREEN} . (XBLUEIHTGREEN?} gs TBLUEIRLOR 
EEN} y5y" j : 

248 PRINT“ CDOUNF" 

250 PRINT*CBLUE SPALES AVSONYKIBLACKIETEN BANG C 
# BLACKIULCEN ORNG Cr BLACKIKCRUSOEE SPACE BLUE R 
VSONIKISPACE BLACKISLRVSOFE SPACE RVSON BLUEIKB 
LACKIRIBLVUEIKCBLACKIREBLUEFPAISPACEZ BLACKIBLBLAC 
K C\ PÜRPLEIKISPALE BLACKIBICN FÜRPLEITLSPACE BL 
ACKIU" 

26 PRINT" BLUE SPACES AVSOH} ,TGREEN) ICE CHI ,TE 
LUE CG GREEN, GHY ,IRVSDEFYZBLUEN „AGREEN) „„AlBLUE 
3, {GREEN} , (BLUE> ,{GREEN> ‚ {BLUE} ‚ (GREEN) gys (BLUE 
BVYSOH CB GREEN CH RVSOFF+, (BLUE RVSDN CG GREEN 
CH RUSOFFY ,„*" 

279 FRINT"{BLUE SPACESI „(GREEN „4, TBLUEI ‚IGREEN 
3,{BLUE} „TGREEN) , BLUE}  TGREEN? TBLUE> „GREEN „LT 
BLUE) „IGREEN) „(BLUE C+ GREEN}, CBLUEI IGREENY,COR 
NG) „IABLUEIREGREEN} „LORHGIKISPACE BLUEILIGREEN}, 
TORNGIR" 

2890 PRINT"CBLUE SPACES} ,(GREEN} „RIBLUE CH GREEN} 
„(BLUE? {GREEN} ,IBLUE RVSONINERVSOFE GREEN? „(Bid 
£3 „IGREEN} „{BLUE} „GREEN? „BLUE „TGREEN? 5. {BLUE 
?,IGREEN} „yyLSPACEIE,RISPACEIE KR" ö 

290 PRINT"{BLUE SPACESI „IGREEN) {SPACE BLUE? ,TGR 
BEN} „CHLUE) „ TGREEN? 5, „BLUEN {GREEN} „(BLUE RVSUN 
IR{GREEN} „CBLUEI „IGREEN) ,IBLUE RVSOFE CG GREEN}, 
TBLUE? „LGREEN} „{DRNGY , IRVSOFFYEIBLUE RVSONIRARVS 
OFF ORNGY ,CBLUE AVSONIUCRVSOFF GREEN) ,TBLUE RVSO 
HIYASPACEIKCRVSOFFE. GREEN} ," 5 
309 PRINT"CBLUE SPACESIECGREEN) „ASPAGE BLUEISTER 
EEN} „{BLUEISTGREEN} „ CBLUEIRABREEN} , CBLUEISTGREEN 
Pr, CIBLUEIRIGREEN? „ BLUEFSAGREEN? „ IBLUEISIGREEN) 
a» IBLUEIKCGREEN} ,„ (LBLUEIRTGREEN) „, (" 

318 PRINT" {DOHN2 SPACEA PURPLE>'TORNG RUSON C# R 


ATI EEERERTELLSELLERREREER EL 

































































































































































yureınmrunereesnnnenn tRKSDFFFZ" 

330 PRINT"{SPAGE4 BLUEPNIGREEN? ,„LORNBIWRLTTEN,B 
Y,ANDREAS „NIKIECH{RVYSUFEF. GREEN} Ay" 

348 PRINTT{SPACES GREENYK, say sunnnr nennen nenn 
173, 0": POKEA5286 ‚PEEK (45286) DR14 

358 vOL9: RESTGREAGAR 

3648 FORX=BT0221 GETAS: IFAS<?""THENSSE 

378 READA,B: SOLMND1,A,B: SOUNDZ,A+1,8 

388 NEXT 

378 RESTORE498:GOTDISSB 

499 DATA 812,08,798,08,779,13,854,08,834,98,818, 
13,854,13,854,13 

418 DATA 034,13,9%4,17,864,09,854,@8,834,13,798, 
13,810, 13,798, 13 

422 DATA 810,13,801 ,08,B64,08,854,13,911,00,877, 
0,881 13 

438 READA ,Bı FORX=7TOBSTEP-1a BOUNDI „A,Bı SDUNDZ2 ,A+ 
1,2: VOLX:ı NEXTı S8YSSS6R 

448 POKE 6572B% ,PEEK (45284) AND1914SENCLR+ GOSLB3AS 
@ 

4529 FOKE 45287 ‚241 POKE65284 ,PEEK 165286) ANDZ3F1 T= 
90:FA=197:1C4=12:L4=6: Z1>91 722=9 














<136> 
<114> 
«72> 


<187> 


<ı71> 


<B> 


«13? 


<17&> 


<251> 
<134> 


<1&68> 


<234> 


<205> 


<242> 


<e7> 


«125? 
<B2> 
<ZA&> 


<137>. 


<195> 
<252> 
<11> 
x38> 
«2593> 
<232> 
<45> 
<935> 
<131> 
1457 
<i> 


<B2> 


460 POKESSSO2 ‚Br POKEHBIAS, L9B 
479 :POKEAS287 ‚PEEK (65287) OR12B 

488 : IFPEEK (ZBB}=DTHENDIMZ$ (10) : POIKE2UB ‚255 

498 RESTORE49B: FORK=ATOFLREADZE IX) NEXT 

SO® DATA"CCK GV DOHN LEFTZ CB RVSONI@CDOHN LEFT2 
FABLRVSDEFI" 

S1D DATA" CRFSOHICDIDGNH LEFTZIEFTDONN LEFTZICHTR 
VSOFEI” 

520 DATA"IRVSOHILITDOHN, LEFTZIKLIDONN LEFTZIMNER 




















VSGEEI" | 
Sm DATA" CRVSGNIUOPDOHN LEETZIGERTDONN LEFTZISTER 
VSOEFI” 3 


548 DATA" LRVSONIUCRVSGER SPACE DOHN LEFT2 RVSON) 





55B DATA” CRVSONYYNIDOHH LEFT2IINCDOWN LEFIZIITIR 
VSOEFI" 

S&B DATA" IRUSDNI_ISPACE DOWN LEFTZYYKSPACE DONN 

LEFTZIHSCRVSOFF}I" 

570 DATA"{RVSONYKELDOUN. LEFT2Y'CCDOHN LEFTZIDIERV. 
SOFF- SPACE RVSUFF}" 

539 DATA” CRVSOHIAH{DENHN 
VSOFF}” : 

SQ DATA" IRVSONIWILDONN LEET2IZSIBOHN LEFTZIASTR 
VSOFEI” 

HEN IFLA)=TCRVSONI_TSPACE DOWH LEFT2Y!"+CHRF (34) 
+EHRE&I3S4) +" CLEFT RVSOFF BLACK>Y ,TPINK LEFT RVSON 

DOUN LEFTZIHSTRUSOFFI" 

&1a PRINT" CBLACKF ss nun Hann REITER T ET 
PERERTERT N " 

820 PRINT" ‚yyressrosnrssnnntRUSOH PINKIATSPACES 

RUSGEF BLACK ya ayoaru sure Yn 

638 FRINT", „MARBLE,MADNESS, TRVSON PINKISLSPALEL 

RYSOFF BLACK) „„BY,A,NIKISCH, „14 "1 

548 PRINT” sayeranınorunnrnn (RUSOH PINKIATSPACES 


654 PRINT season Ver TITTEN 
sntRBINKY" . : F 
660 CHAR1,18,1,291Z1) 3 CHAR1 28,1, 28122) e PRINT" CH 
OHE. DONNA” :5YS57128: GOLOR1 ,C6,L6 

&7U PRINT"ISVIY SL ST SW193" | 
6ER PRINT"ESVS St SH SVI® St SI SE SD CS SI SH17 
y 











LEFT2Y,-{DOHN LEFTZ2I.BIR 









































8 
14 
S 
r 
m 
& 
S 
® 
& 
R 
R 
RB 


SE SD SO SQ Sur" 

7839 PRINT"{SV3 ST SR SE SD 
SD CH CU SE SD SE © 
SD 56 SJ SE 
sp 56 


sD SD sa SW5)" 
888 PRINT" {53V7 











SE SD st Sq SH 





858 PRINT"iSV17 ST SR SE SD SQ 5Q 
Susr" 

BU FRINTCHVIP ST. SQ SWT SV& 546 HONEI"JSPOKE6S 
286 ,‚PEEK (835286) OR15:COLORB,2 

E70 K=3357rPOKEK-1824 ‚5Y: PÜKEK ‚A412 P=69 J2=Kı6=3 
945: POKEG-1824 „Bı POKEG, A457 P0=491 7=8 


SWS Sv5 ST Sa 





CSompube mik 


<134> 
56r 
<137 
<b4> 


49) 


<178> 
<11> 
<107> 
757 
<125> 
<1777 
<5> 
<125> 


<1927 


<185> 
<87> 
<134> 
<1a5> 
<134> 
<7B> 


%2437 
«2477 


<44> 
<255> 
<i18> 
<a) 
«2r 


<145> 
<17> 
<40> 
<235> 
<106> 
<119> 


<20> 

*14B> 
<72> 

<138> 
<1753> 
<132> 
«2223 
<109> 


«2227 
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‚GEB Kil)=s4:K(DeilädrıKtHhebsrK iu? - 
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898 Gt1)=K11)ı812)=K (2) ıB=8:C=1924 

754 60T0728 

YıR DATA-4B,-3B, +8, +42,+40,+38,-1, -42 

720 RESTOREFLMFORK=IATOBF READKUCK) SGELXI KUCHEN 
EXT x 

9358 Di=-K:02=P 

7408 REM rar 

958 REM #*# SPIELBEGINN wu# 

YA REN EHE 

978 vüoLd ; 

980 POKE23SF,0:J1=J0OYt13a IFIL>127THENJL=EJ1-128 
999 IFJI=BTHENLOID j 

420 J2=I2+KUtJLIR I=INTIRNDILIR2I 41 

1818 IFPEEK (12) >&FIGRPEEK (J2I <GBTHENL17O 

1828 POKEK-C ,Fö:POKEK »PıP=PEEK {J2} 1 POKEJZ2-E, so:P 
IKEJZ,K{I)ıK=J2 

1B3B IFK=ZTHENI75B 

1948 G=-5+GE<B) 

1958 IFPEEK {B})<>&AYANDPEEK {B) < >6BTHEN134M f 

185A POKEtB-GE (B})-C,FösFOKEG-BE (BI „POsSFO=SPEEK (B 
’ 

1979 POKEG-C ‚8:POKEGB,GLINT (RND (13 #23 +1) U B=INT RN 
DiiIaB)+L 

1480 WO=WI+L LT ONNZABOTOFAR, BU, 790,920, 90 ,789,988 
‚788, 1898 


1970 Wa=0: T=T-44 IFT=BTHENLASB 

1103 T$=BTR$ IT) : IFT<SLBTHENTS="B"+T6: SDLUNDE „942,5 
1119 Zi=VALCMIDSCTE, 1,29) 2 22=VAL {RIGHTFLTS,12) 
11228 CHAR1,18,1,2$1213 sCHAR1,28,1, 29172) 

1134 GDTOFBA 

1140 REM este 

115@ REM # LEBEN VERLIEREN # 

1165MD REM Ken 

1178 POKEK-C ,Fö1POKEK „PrL=B5 IFFEEK (J2I <SHBTHEN16B 
8 

1188 12=-J32-KUtJ1I ı N=8: IFII=ZORJTL1=-AORIL=-SORTLSSOR 


J1=7THEN1258B ' 

1178 FORX=(28-L) TOBSTEP-1:N=N+1 

1200 SCHINDI ,IUR-N,2:SOLUND2,FBE1-N,2 

1210 FORY=BTOIFANEXTY,K 

1228 FORX=BTO19: SOUNDS 02,2: NEXF 

1239 TeT-4: IFT(=BTHENIASO 

1248 POKEK-C ,30: POKEK ‚84160101870 

1250 M=K+48 

1240 PE=-PEEK (M}aN=-® 

1278 FORX=KTUFFI12STEP4B:NeN+lıLl=L+1 

1280 POKEM, PEıPOKEM-E, F&:M=M+4@: PE=PEEKIM) 

1279 IFPE<SBSANDPE< >O7THEN 198 

13RQ POKEM-E,39:PBDKEM,64 

1318 SÖUND1 „FB@-N, 2: SOUND2,FOL-N, 2 

1329 NEXTX:POKEN,PE:POKENM-C,F6aBOTOELTB 

1330 REM AUunenunuurnentunen 

1340 REM *# KUGEL AUF KUGEL # 

1350 REM wenutennnuannaruuun 

1360 IFPEEK(G}CHBTHEN1598 

1378 G=6-GE(B) ıB=INT{RND{1)*8}+1:50T01898 

1389 POKE (G-GE(B))-C,Fö:PüKEG-BE (B} „PD 

1398 PO=P:POKEG-C,BsPOKES ‚6A 

1499 FORX=2T029:S5DUNDS,6503,2:NEXT 

1419 K=D1:P=02: POKEK-C „SW POKEK „64 1,12=K: BOTH WAR 
1420 REM wunnnnurnnuruene 

1458 REM #* ZEIT IST Ayuß.!t = 

1449 REM KERNE 

1459 CHAR1 ,18,1,28(@) sCHARI1 ,28,1,Z26(@): VOLE@ 

1460 FORY=7TOBSTEP-1: FORX=RTD4: SOLND1 „700, 2: SDUN 
D1,900,2:VOLY:NEXTX,Y 

1470 FORY=-11058: FORX=3T016:COLOR4,X,S5:NEXTX,VıCD 
LUR4 , 1: C0LOR®, 1: SCNCLR: VOLB 

1489 POKE45287 „8: POKE#5286& ‚PEEK (652864) ORA I 

1499 POKE452896 ,FEEK (65284) AND23F 

1509 POKEsSSMI ‚8: POKEBRSSR2,IF 

1519 POKESSIBS, 72: POKE653B4,58 

1328 PRINT"CHOHME DONH3}* 

1538 PRINT"CSPACEIL CYAN) ’LGREEN C#3 ,ITSPACE CYA 
NI'LGREEN Er3AC5PACE GREEH RVSOHIRERVSOFEFITACVAM 
I’LGREEN CHYKIGREEN RUSUHTKERVSOFFI yR" 

1549 PRINTYISPACEIL CYAN RVSÖNIKLRYSOFF RED CHR 
VSOFFI )„RICYAN RVSONISTRED RVSBEF CH .RVSDEFI,ALO 
RNGY „TREDY „LEO CHI ,EGRNGY „TREDI ,,„,” 

15590 PRINT"CSPACELT GRNGY,CREDI „IRVSON GREERYS,C 
RUSOFFIYLORNGY „{REDI „ TORNEI „CREDY „ DANG? , TREDY „, 
vr {DRNGY „ TREDY „IGREEN} 5%" 

1569 PRINT" (SPAGEII ORNGY „{REDY „CDRNGIKLREDY ,„tß 
RNGI „(REDI „IGREEN RVSOHITIRVSOFF BEDY s TORNG> , (RE 
DI JRARVSOHFRERVSDER} „IORNGF „LREDI sy," 


















































<3> 
<1i94> 
<216> 
<54> 


<141> 
<02> 
<136> 
<220> 
<156> 
<24> 


:<19@> 


<192> 
<a4> 
<21> 


<1B4> 


<235> 
<214> 
<154> 


<1A4r 
<118) 


<255> 
<B> 
<19> 
<216> 
s156> 
<209> 
<al> 
<24> 
<101> 


<1a7> 


x? 
<2487 
<1397> 
<iSD> 
«35? 
x146> 
<162> 
xb8> 
x47> 
<54> 
<977 
<145> 
<242> 
<14> 
x158> 
siä> 
<217> 
436? 
<59> 
<127> 
<b2> 
«1247 
«2187 


<163> 


<ıda> 
«150> 
<128> 
*144> 


232> 
<170> 
<197> 
747 

<135> 


<51> 
<249> 


<87> 


<14> 


<218> 


«18> 


Programme 


1570 PRINT"ISPACEIL DRNGIEKLRED}Y „IGREENY ‚{PVSDNF?. 
XRVSDFF RED} , CORNGY sCREDY y „ „ TORNGI „ REDI „ESPACE 
ORNG> , RED} „LORNGI „CREDY „GREEN 5%" 

1582 PRINT"ISPACEIZ REDI&, „ÜCORNEIRCREDI „LORNGIE 
tRED} „ SÜRNGIRIREDI „LSPAGE, ORNGIKTREDI „ LÜRNGIKCRE, 
Diyay" 

1599 PRINT" {DOHRY"g 


























I1EAB PRINT" CSPAGEIT EYANY'IGREEN CH) „KISPACE AVS 





OHYRIRVSOFFIWÄRVSONIKCRVSOFEIRURVSONIRERVSDEF) 4 
KIRKSONFSIRVSOFE} „EN 
161® PRINTTISPAGEII CYAN RVSOHIRLRED RVSOFF CH R 


VSOFF> ySRIORNG) , TREDY „ TORNGI „ RED) „ TORNGY JCREDI, 








"Ws ORNGI yEREDF , ,%” 





1420 FRINT"{SPACEII DRNGY TREDY „SPACE ORNGY KRE 
D3 „CORNGF „CREDY „AQRNG? „ RED) , ORHG3 „ (RED? „ TOREEN 
I, RIGRNGY „ARED) „GREEN RVSONIACRVSUFF RED," 
1559 PRINT’ISPACEIT DRHGY„TREDI „ISPACE DRNGY TREE, 
DY„CORNGY „{RED) „ LORNGY „LRED} „ CDRNGI „EREDF gas tDRH 
GI ,SREDY „A“ 

1648 PRINT"T{SPACELIL DRNGIRERED} „TGREEN} „ TRVSOHIX 
{RVSOFF REDI „{ORNGFRIRED) „ IGREEN RVSOHFALRVSOFF 
RED? ‚TORHG} „{RED} . TGREEN? sRTORNG} ,{REDI „5%“ 

16852 PRINTYISPAGEIZ2 REDYS&, „ VISPALCEIN ,„ CIDRNGIHERE 
DD}, „s{QRNOFKTRED) „&, "SPOKEAS2EA „PEEK (45286) DR1S 
1659 FÜOKE23I „Br FORX=DTOFPI: IFIOY LI PIZPTHENPOKEZ 
Ba,A@sRUN 

1478 NEXTSPOKE208 „O1 RUN 

isgM REM Kun 

14970 REM #* KUBEL AUF KUGEL 2 #- 

17ad REM VE 

1719 POKES-T ,Fö:POKEB ,PO:@=J2: POKES-C , Ba POREG, && 
60701490 

1728 REM Hesse 

1738 REM # BILDER KECHSEL # 

1748 REM Rama 

1750 Bs=B6r1: T=T+5 

1769 DNBASOTO18648,21590,2490, 2828,3159 ,3488 

1772 REM wussten 

1798 REM ###+ BILDER *“r 

1790 REM wur 

18B8 ı 
1918 REM 















































BERKERNEHE 

1828 REM = BILD 2 # 

1938 REM zaruunene 

1849 PFOKE6528B6 „PEEK (65284) ANDZ2S9I:PRINT" ICLEA 
IE SEERERRRARLLEELELEILELLELESUEIRRERSEHERER 
ununuons CRUSON en 
RUSAFF BLACKS sa snur una I 

1969 869 PRINT" „„MARBLE, MADNESE , {RVSON PIN KIBTSPACEA 
RVSUFF. BLACK}, „BY pA5NIKISCH, 426" 7 

1878 PRINT” unsuesuereennnnes CRESON BINKYGTSPACER 
ii PREIELLELSER TG 

1998 PRINT” ru PVIUIHIIETTTETUUTETTETNOTTTHTTN 
ss {PINKY”; ITSSBIRECH H IFTSLDOTHENTF=S"BHHTE 

1878 72=VALLRIGHTSETS, 123) eZI=VALIMIDSLTS,, 2,19) 
1708 CHARI 1841426 CZ} ECHARI „20,1, 260223 a PRINT“ C 
HOHE DOHN4}":CDLORI, a L& 

1719 PRINT"ÄSH# SYB 
1928 
D SE SH SvZ S42 
173B ERINT EESu2 


EAR BL 



























1948 PRINT"SHZ SV2 
SV2 ST. SR SE SD 
I@7" 

1750 PRINT" (SH2 
SE SH SL $4 SE SD E $q S$ 542 Sv2 








H Sugr% 


En 
R 








2 ST SR SE SD SQ SI SW2 ST SR 50 50 v2 SL su SE 
SE SO Sa een 
1700 PRINT"{ST. SR „ge sD se SI SW2 ST SR SE SD SE 


Su sv2 ST Sa SE 
s@ SW2 SY63" 


SD SQ SI 542 SW2 SL SI SE SD 


1998 PRINT"ISV2 ST SR SE SD SG SI SL SI SE SD SE 
SD SF SH St. S7 SE SD SE SD SF SH SH SK SE SD SE 
SD SG SI Su2 Zv67" . 
20688 PRINT”{SY# ST SR SE SD SE SD SO SQ ST. SR SE 
SD SE SD SO SQ SI SA SE SD SE SD SD Sa ST SR SE 


SD SG SI SV8}" 
2018 PRINT”{SV£ SL SI SE 


SE SD SG SI SVZ ST SA SE SD so 


Compute mib 


<58> 


<197> 
<251> 


<199> 


<38> 


<1id> 


<259> 


<29> 
«357 
<117> 
<113> 
<125> 
<130> 
195? 
<105> 
<79> 
<a7> 
<977> 
<b> 
<2> 
<201> 
<192> 
<221> 
<73> 
x82> 
<178> 
<ı1B2> 
x242> 
<89> 
<185? 
<109> 


<25> 
«15> 


<i> 


<43> 


4221> 


<a> 


<14> 


1293 


«239 


<2247 


<78> 


<209> 


<65> 





























24 


Programme 


D SF SH Svar" 


J SE SD sQ sa syar" ER 
2030 PRINT"{SV2 ST SR SE SD SG SI SW2 ST SRSOS 
sg 


SD SG SI SV2 SW2 St 5) SE SD SE SD SG SI SH SK 
SE, 5D SQ SQ SW23" 
2068 PRINT"{SVS ST SR SE SD SE SD SO SQ ST SR SE 





ZBEB PRINT"(SVI2 SU4 SY4 ST SR SD 5Q@ SH2 SH SK S 
E£ SD SO Sa SH& SV2Y" 

2078 PRINT"{SVI12 SW4 SV6 SW ST SR 50 54 EUR 52 
>” 

2108 PRINT"tSVI2 SH4 SV6 SW4 SV2 EHI SY2 HaHEr“ 
1: POKE65286 ,PEEK (65286) 0RI& 

2110 K=3356:6=-3989 : PDKEK-E , SB: POKEK „a4: PssYı PO=P 
:J2=Kı Z=G1 B=2:60T0938 

2120 ı 

2130 REM weunnan 

214@ REM # BILD S * 

2150 REM HEHE 

2168 POKE452B&,PEEK 165285) AND235F: PRINT" {CLEAR Bi 
LESER RERKLERTZRLTELTLELLUITERTETTELTIUTER RN 
2178 PRINT? ygayeasueeuusonntBKSOH PINKIGTSPACEL 
RVSOFF. BLACK awE sr TE HH TU TE" 

2150 PRINT", „MARBLE MADNESB, {RVSON BINKIGTSPACEL 
RVSOFF BLACKY „„BYA,NIKISCH, 334” 3 

2198 PRINT" uarnsuossrenunner TRESEH PINKISISPACEE 
RUSOFFE BEACKY zaaonn vers..." 

Fr SL ESTPPIPETIEEETEELLERSTTRRLTRETERELTTTT, 
arvntPIHK}"g2 T8=-STRE$ CT) a IFT<SLOTHENTS="O"+T$ 

2218 Z2=VAL{RIGHTFLTS,1I) 1 ZI=VAL(MIDFLETE 2,133 
2228 CHAR1,18,1,Z&(Z1) sCHARI „20,1,261Z2) zPRINT"T 
HONE DEHNS}" «COLOR ,CH,L.6 








SD SO S@ SU2 SH SK SE SH SV2Z ST. SR SE 5D SV2 542 
SE SD SE SD SE SD SE SD SE)" 

sa SW2 SM SK SE SD SQ SQ SV2 SL SI SE SDSE ME 
M SK SE SD SE SD ST SR 50 s@ 

2259 PRINT"ISD ST S 
Sn SK SE SD So 50 





2268 PRINT"(SD sV2 SW2 SE SD SD SQ SW2 SH SK SE 
SD 50 SQ SU2 SH SK SE SD SQ 5@ ST SR SE SD SE &D 
SE SD SE SD 502 SW2 SE)" 

227@ PRINT"ISD SV2 SW2 SQ SQ SH2 SM SK SE SD 50 
SQ SH2 SH SK SE SD SQ SQ sw2 SV2 ST SA Sk SD SE 
SD SE SD SF SH SM SK SE»" 

2280 PRINT"ISD SV2 SH2 SG SI SW2 ST SR SE 50 so 
SI SW2 ST SR SD Sa Su2 SM SK SE SH 3V2 ST SR SE 
SD SE SD SE sD SE SD SEI" 

2290 PRINT"(SD SV2 SW2 SE SD SG S2 2 ST SR S 
SD SG SI SV2 SW2 SM SK SE SD SE SD SE SH sY2 ST. 


SR SE SD SF SH SH SK SE 
SH SV2 ST SR SE SD SE SD 
2318 PRINT"(SD SV2 SW2 SE SD SE SD 
v2 ST SR SE SD SE SB 





232@ PRINT"tSD SV2 542 


v2 54 SI SE SD SB SQ SM SK Sß 


H SK SE SD SE SD SE 50 SEI" 

235@ PRINT"{SD SVZ SH2 SE SD SG SI SW2 ST SR SE 
SR SE SD SE SU SE SD SE}" 

236@ PRENT"{SD SV2 SW2 SE SD SE SD 86 Sı SW2 ST. 
SR SE SD S6 SI SL 89 SE SD SO SQ SL. SR Sr. SD SC 
SI SV2 ST SR SE SD SE SD SE" : 


237@ PRINT"{SD 372 542 SE SD SE SD'SE SD SF SH S 

















“742 


<112> 


<122> 


62337 


“73 


<69> 
x174> 
<127> 
<«194> 
<75> 


<«125> 
«138> 
<147> 
x250> 
«167> 


<s1> 
<154> 


<1747 
x90> 


<BR> 


<bh> 


4337 


<57> 


x2> 


x36> 


«2837 


4237 


<146> 


$242> 


<29) 


<72> 


<244> 


<45> 


“98> 


s131> 


DB 59 SQ SW2 SV2 ST SR SE SD SE SD 50 S@ 542 


sa SW2 SV2 ST SR SE SB S 


SK SE SD SE SD SE SD SE 
sa SF Sa SW2 SH SK SE SH 572 ST, 
SR SE SD SF SH 502 ST SR SE} 


v2 ST SR SE SD SE SD S 
v IE 





la 
P 
R 
1%] 
8 
RR 


SI SE sn 50 SQ sy2 St 


2) 
&a 
0a 
m 
ee 


SD SE SD SE SD SE SD SO S@a SW& SY2 SW2 SH SK SE 

SD SE SD SE SD SE HOHE)*) PDKE6S236 „PEEK(65286)0 

Rid 

2439 K=II329:62:39813P=69: PO=P: ZeBı J2=Kı Be21 POKEK- 

C,5Q:PlIKEK ‚644 FOKES-C, BD: FOKEG „64 

2448 GOTOYSA 

2430 ı 

z246# REM wauunaanee 

2472 REM = BILD 4 # 

zZ489 REM warum 

2479 POKE65ZB6 „PEEK (65286) ANDZSFIPRINT"TGLEAR BE 

DISS TEETITETERTLTERESTLSTRTEITERETELLE TH 

25a0 PRINT" yaynnersnesuuenen iRUSON PINKIALSPACES 
RBUSOFF BLACKY a unaasassruuun une" 

2518 PRINT”, „MARBLE ,MADNEHS, {RYSOH PINKIALSPACER 
RVSOFF BLACK} 4 „BY ,A,NIKISEH, „4," 9 

2528 PRINT" gysoosuseroynsunvtRlSBH PINKISTSPACES 
RVSOFF BEACKI gusouo sure urn nn" 








2538 PRINT" yuyyosuso 7ER BUTPTFTITTTEFIUTFTIERTRR 


“ 
ans tPINKI" 5a TS-STRS (TI IFTS LATHENTS="O"<T$ 
2548 ZZ=VALRIGHTSTTS, 1) 2 ZI=VALCMIDSE(TSE,2,1)) 
2558 CHAR1,18,1,281Z1) 2CHAR1,29,1,2%122) 4PRINT"L 
HOBE DOHN4}“ACOLOR1 ,C6,L6 
2560 PRINT"ISG S@ SV# ST SR SG 5a SH2 SH SK SE S 
# Sv2 ST SR SE SD SE SD SD SQ SW2 SH SK SE SH SV 
2 ST SR SE SD SE 583" 
2578 PRINT"{SW2 St SF SF SH SV2 542 SH SK SE 

S 





SE SD SF SH Sy2 ST 5R SO Sa SW2 SH SK SE ED SO S 
@ 5YA ST SR SE SU}" 
20 PRINT"tSH2 ST SR SO SQ SV2 SH SK SESD Sa & 





RR 
un 
Kos 
0) 
Kr 
4 
1a 
1 
u 
& 
& 
“ 
3 
% 
= 
R 
m 
8 
B 
IR 


SD SQ SQ Su2}" 

2430 PRINT"IST. SR SE SD 86 SI SW4 SH SK SE 
SQ ST SR SE SD SF SH SM SK SE SD SO Sa SW2 SM S 
K SE SD SQ SQ Su2 sm skı" 


2648 PRINT"(SV2 ST SR SE SD SG Sr SW2 ST 
D SG SI Sv2 ST SR SE SD SE SD SO SQ SW2 SH SK SE 





ß 
R 
® 
N 
& 





sv2 ST SR SE SD 


& 
8 
” 
2 
- 
z 
- 
= 
8 
Y 
er 
3 
16} 
Fr 
£ 
r 
® 
R 


2474 PRINT"{SHZ S4H SK SE SD SO 5Q SW2 


R 
a 
BZ 
m 





R 


St. 54 SE SD SU 897" 


® 


RS 
IS 
N 
a 
x 
in 
% 
23 
Bu 
” 
b> 
%% 
hu 
N 
kei 
4 
u 
© 
S 
R 
x 
2 
% 
iS 
IN 
BR 
pr 
1? 


IS 


.50 5@ SH2 SH SK}” 


Compuhe mib 


<xB9> 
«i34> 
x249> 
<52> 
<125> 


s187> 


<28> 
<229> 
<213>. 


<76> 
<242> ; 
<126> N 
“aa 
139> 
<249> 


<165> 
«155? 
<141> 
<B>. 
<150> 
<228> 
<148> 
<163> 
<193> 
<169> 
<136> 
<94> 
<203> 
<242> 
<205> 
<144> 
<Ba> 
<1B0> 


<i151> 


5/87 


u 74 





2768 K=53ABıP=69416=4092:PQO=Pr PÜOKER-C , 50: POKEK „64 
SPOKEG-C, 9: POKEB, 64: J2=Kı Z=G 

2779 GOTOPS® 

2788 ı 


2778 REM Kmematae 


2528 REM #* BILD 5 # 

2810 REM #erunnunen 

2820 POKE&5286 „PEEK (65286) ANDZ2IFHPRINT"IELEAR BL 

EA STEERERLEREELLLIKEELRETELELESETESEELELE IN 

2838 PRINT" „yroosunrnnunnuns TAVSON PINKIBISPACES 
RBESOEE BLACK guy snauennanannnn" 

2842 PRINT", ‚MARPLE,MÖDNESS.TRVSON PINKIGESPACER 
RVSOFF BLACKF , „BY, A,NIKISCH, 52" 

2858 PRINT" zusosenueruunsnnntRESON PINKIATSPACER 
RVSOFF BEACH yauu ren." 

2868 SUSE REEITLESELLSEERRLELLZERLERTIETS TI 
urn TPINKY"yı T$=STRFATI E IFT<LOTHENTSA"@"+ TE 

2870 Z2=VAL RIGHTS CTF,IN SE ZI=VAL IMIDFLTS,2,19) 
2880 CHAR1,18,1,Z81Z1) aCHARI „28,1,26 1Z2) aPRINT”L 
HOHE DOWN" sSCOLOR1 ,C6,L6 








Ri 
3 
3 
wi 
z 
3 
ei 
N 
187 
12} 
$ 
In 
m 
A 
5 
ta 
I 
IE 
[5 
Alm 
3 
13 
® 
R 


8 
A 
R 
S 
= 
Fa 
& 
B 
[= 
N 
un 


Na 
ie 
u” 
ER: 
EI 
Sen 
Zn 
1423 
a 
Ken 
er IB 
an 
ag® 
mer 
p R 
pr R 
BR 
RR 
m ® 
gr 

17] 


| 
| 
| 


m 
Re 
38g 
„An 
anal 
Suß, 
A 
ARkn 
BT 
ER m 
Be R 
I 
Er h 
uN ® 
er R 
gr m 
ram 6 


n 
R 
R 
72 
= 
5 


= 
Mil 
Sig 
IM 
or 
8 
& 
® 


19 
gpP 
Be" 
RR 
N 
2 K 
2 RR 
» BB 
Ss Bl 

” 


®| 
A 
S 
wa 
4 
Is 
FA 
ER 
Ri 
[4r} 
S 


"3 
8 
12] 
R 
w 
A 
N 
4 
a 
Rr 
Ya 
n 
A 
Es 


| 


E 
g 
m 
R 
2; 
Em 
Ha 
Er 
Ag 
ER 
Re 
Ein 


Le 
2 
Ki] 
m 
Sr 
ke) 
a 
I 
1% 
“ 
N 
%% 
Bir 
“A 
9 
nr 
Ei; 


IR 
B 
® 
S 
R 
IN 
E 
R 
I 
2] 


27979 PRINT"{SK2 SH SK 
D SO SQ Su2 SM SK 
sv2 ST SR SE SD SF 
3OR@ PRINT"ISH S 


8 
& 
r 
RB 
R 


! 


EM: 
Em 
güg 
B 


„ 
R 
& RE 
RB RR 
x RR 


R 
= 
RB 
R 
R 
" 
R, 


m Als 
ISIS 
File 


Gi 
= 
8 
= 
2 
nd 
zZ 
= 
= 
In 
“ 
2 
A 
ß 
& 
% 
mi 
8 
% 
5 


SI SW2 ST SR SE SD 56 SI 
SE SD SE SD sn SQ SW2 SV2 
3a20 PRINT"(SV2 ST SR S 


8 
& 
R 
R 
“ 
8 
in 
ße; 
Bar 
Kg 
Air 
Em 
eR 
ge 
e® 
ei 
Ya 


| 
| 
| 


.S 
n& 
Aa 
S2 
Kr 
Sg 
NIE 
RR 
Km 
B % 
Rp 
R 
Ei 
a. 
[r = 
er 
Be 
BR 
1} 





3 
e 
eg 
Kr 

"ER 
RF 
pR 
gF 
m 
ef 
ei 
mt 


N 
B 
2 
R 
R 
R 
R 
| 

se 

AR 


ER 


RR 


A| 
AuE 
Er = 
Sal 
FRE 
Re 
a2 
8" 
8 
Rn 
re 
En 
uR ER 
aM FR 
g5 Ei 
"BR 


<2127> 
<16$> 
<44> 
<187> 
«237 
<48> 
<32> 
<41> 


<ı5a) 
“ur> 


x202> 
497 
<24> 
69? 


<241? 


<231> 


x217> 


<187> 


<285> 


<a3r 


<23> 


<18> 


<138> 


<til> 


«2347 


<49> 


<141> 


2467 


<183> 


147? 


<74> 


«797 


<124> 


<4b> 


<255> 


Programme 


A 


SR SE SD SE SD SO S@ SW2 SH SK SE SD SE SD SE 


H SY2 ST SR SO 5Q SV2 SL SU)" 

Saga PRINT" (SV2 SWZ SE SD SE SD SE SD SF SH Sy2 

ST SR sa SQ SW2 SH SK SE SD SE SD SE SD SE SD SE 
SH SV2 SW2 St SI SE SD HOHEY"JCPOKEASZBA,PEEK (A 
52H H0R1E 

Sa98 K=-3449:P=6B: 0=39085 1 P0=P ı Z=ßı J2uK ı POKEK-C ,58 
»FOKEK „S4: POKEG-C ,@s:POKEB, 54 

3129 GDTOF38 

s118 r 

3129 REM suruneenne 

3138 REM »# BILD & # 

3149 REM Wan 

3159 POKE#5284 „PEEK (65285 } ANDZI3I:PRINTYICLEAR BE 
SFR FERKERZELLERLZLLLLLLEESEEITERELTELEN 
Ss14B PRINT",, anseorseusniRFSOH PINKIALSPACEL 


..,. 
RUVSOFF BLACKY s sauna a sauna" 
317@ PRINT” ,„„MARBLE „MADNESS,{RVSUN PINHKYSISPACEL 
RVSOFE. BLACKI 4 BY AYNIKISCH, 46, "1 
Z1ISD PRINT ugpeauueuunn nenn TRUSOH PINKISCSPACEL 
RUSOFF BLACK) sauuauuınureuuennn" 
FI7A PRINT" EHRE EST IT IH TITTET TINTE 
urn iPINK+"3 ER TFS5STRSE (TI E IFT< LOTHENTSSHB" HT 
3220 ZZ=VAL{RICHTSETE,12 3 Z1=VALCMIDF(TE,2,1)} 
$321@ CHARi,19,1,ZS1ZLI ES CHAR1 „20,1, 28122) ıPRINT" C 
HOME DOWNH4I":COLOR1.C6,.C5 
Sk SE SD SQ Sa su2 sm SK SE &H SVZ SI SR SE SD 
SE SH SM SK SE SD SE SE SE SD)" 


3070 PRINT-(ST SR SO SQ SE SD SE SD SF. SH SY2 ST. 
D SE 


pa 

















N 
Rip 
N 
Mg: 
eg 
ke 
“ 
Pa 
Sta 
® 
R 
Br 
ß 
Mr 
% 


E 
R 
R 
h 
ke 
14 
R 
N 
R 
ß 
R 
8 
R 





"nn 
en 
n a © 
En 
(27 Bi 
„8 
N 
AR 
Be 
Mg 
B 
8 
Re 
he 
1423 
R 
i% 
bs 


1dr7 
122] 
m 
8 
[#77 
Kae) 
B 
® 
® 
R 
R 
B 
R 
[777 
k 


| 
| 
E 
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| 
| 


R 
R 
B 
8 
8 

er 
N 
IN 
® 
» 


“ 
ur 
ß 
B 
% 
1 
m 
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Ss 
\n 
Bu 
in 
= 
n 
z 
In 
Ku) 
z 


R 
“ 
m 
in m 
S 
& 
in 
D 
Kl 
Ka 
im 
We 
zZ 
IN 
B 
B 
Im 
S 
a 
m 
R 
in 
IS 


3508 PRINT"{SE 
SE SD SQ 5@ SW 
H SV2 ST SR SE 


3518 PRINT" ISE 


ir 
B 
R 
n 
in 
x 
w 
ta 
m 
in 
ve} 
A 
DS] 
ef 
5 
R 
N 
E 
R 


Be 
x 

RS 

R 

Ri 
„eo 
A 
arte 
Sg ® 
Ku e 
ep R 
Ru R 
Rp 5 
ER 
A Re 
Em m 


S 
r 
R 
R 
B 
R 
B 





Gl 
KA 
N 
[>] 
3 
nl 
ä 
A 
Ä 
miss 
IS 
R 
ER 
a 
5 
® 
2 
= 
A 
x 


& 
e 
A 
8 
& 
8 
33 
r 
" 
1 
8 
ie 
le 


Rr 
Ba 
&% 
.R 
E 
R 
a 
9 
ß 
3 
RR 





In 
ß 
2 
R 
ß 
e 
13 
8 
. 
R 
ß 
2 
2 
R 


1 


a 
A 
3 En 
3m 
77, 
z8 
ei 
= 
a 
„R 
uR 
x 
IND 
u. 
N 2 
a 
= 
1] 
x 
A 
Ps 
B 
5 
R 
R 
a 
= 
wa 


K SE SD SQ Sa SW2 SH SK SG SI SV2 ST SR SE 


e' 


ZA1B PRINFPISE SD SE SH SM SK SE SD SE SD SE SD 
SE SH SV2 ST 5R SQ SQ SW2 SYZ SI SR SO Sa SW2 SW 


Compute mit 


<13> 


<89> 


<197> 
<124> 
<1908> 
<117> 
<241> 
<ı137> 


<21> 

+124> 
<144> 
<144> 


<6B> 


<5a> 


<36> 


<41> 


<a5> 


<157> 


<124> 


<35> 


<38> 


<81> 


<155> 


Or 


<2u7 > 


<103> 


<254> 


%30> 


1567 


<78> 


<220> 


<191> 


<i8> 


<169> 


25 











Programme 


EK (55286) DR1& 

3420 K=331416=3653: 2-6: J2=KıP=4HPO=ABr POKEK-LC,5 
8: POKEK „64: POKEG-C „A: PIKEB „64 

3430 GOTOFSB 

5440 ı 

3450 REM wannunuannnnn 

5460 REM # LEVEL 1-6 # 

3474 REM wruiinen ne 

3488 POKE65286 „PEEK (45284) AND239: COLORM, 11 P6=@ , 
3490 POKE#5287 ,PEEK (545287) DRB: LE=L.E+1ı IFLE=7THEN 
37780 
3500 
3510 
SPACEY gas tSPACEI," 

3520 PRINT" SPACESY , (SPACE3Y , (SPACEZ)Y „(SPACEI „IS 
PATE) „ISPACEIY „ISPACEIZY 5" 

3530 PRINT” {SPACESYI,TSPACEZ}Y „„TSPACE2Y „LSPACEI,t 
SPACE) „„ISPACE2I," 

S540 PRINT"XSPACES) ,TSPACE3} „{SPACE3Y „ISPACEI „TS 
PACEY „{SPACE3) „ISPACE3) „" ; 

3559 PRINT" TSPACESY „„uISPACE) 5 21 SPALEI U, KISPAGE 
Iuys SPACE, „y" 

3569 CHAR1,289,7,LE$ (LE) »POKE#3296 ‚PEEK (69286) OR1 
&:VOL8 

35790 FORX=1T03I@STEP18: SOUNDI „A5B+X „21 NEXT: SCNCL 
R: POKE65392,0 

3582 IFLE=1THENRETURN:ELSEPOKEAS287 „PEEK (65287)0 
R24 

35924 IFLE=2THENPOKESSIRS, 181, Ch=14ıLöedı Teß5ı Zie 
8: 22=5: F6=237 

3600 IFLE=3STHENPOKEASSBS, 1898: C65=1Iı L4=61 T=ABd: Zi“ 
8:1 272=0: Fa=2356 

3618 IFLE=4THENPOKEASIBS, 1711 Che1bılä=dı T=75ı Zi= 
7: 22=5: F6=237 r 

3620 IFLE=STHENPOKESSI83, 194: C6=161l.4*61 T=781ı Z1= 
7: 22=B:F6=239 

35398 IFLE=&THENPOKESSIRS, 198: Tes5ı Ziehr 22e5ı Fb=1 
D7ı1Ch=-12:L4=& 

3648 POKE452B4 ,PEEK (55286) ANDZ39: GOTO47@8 

36458 RESTOREI47U: FORX=1TOS:READLESCKI NEXT 

3668 GOTOSABR 

3670 DATA "{FURPLEI,IDOHN LEFTY,{CDOHN LEFT},{DON 
N LEFT)I,„TDOUHN LEFTY," 

35688 DATA "CPURPLE>,„sTDOHN LEFTY,TDONN LEFTSI 


PRINF"ICLEAR HONE DOHM6 BLUEY“" 


PRINT"{SPACESY „{SPAGE3} 44 1 TSPACEI „ESPACEI „€ 


<20> 
<35> 
x197> 
<1835> 
<38> 
<211> 
<58> 
<55> 


<62> 
<1335> 


<242> 
<284> 
<86> 
<224> 
<42> 
<192> 
«148> 
<99> 
<169> 
<239> 
<2> 
<222> 
<139> 
<103> 
<9> 
<191> 
<33> 


„{DEHN LEFT3I,CDOHH LEFTI ,„," 
367 DATA "LPÜRBLEI ,„sIDOHH LEFTI,CDONN LEFT2Y,, 
tDOHN LEET3 „CDOHN LEFT3} 45," 

















3700 DATA "CPURPLE>? „{DOHH LEFTY,ASPACEI „IDOHN LE 





ETII sy SDOHN LEFTIY,TDOHN LEFTI," 

3710 DATA "{PURPLEY,„„{DOHN LEFTZY,CDOHN LEFTY,, 
„tDONN LEFTI,TDOHN LEFT3I sg," 

3720 DATA "IPURPLEI ,„s{DOHN LEFTZY ,CDOUN LEFTY,, 
„IDOUN LEFTIIJISPACEI IDOUN LEFTII Eu," 

37398 ı 

3748 REM waunnunnnnenunn 

3750 REM # MARBLE KING # 

3749 REM wenuunununenune 

37798 CHAR1,39,4,""+CHRE (27) +"B" 

378@ REME65287 ‚PEEK (45287) 0R24 

3799 PRINT"CHOHE BLACKI"y 

an PRINT" gaoune mn URTEIL TRITT 
vr. 

Sen PRINT" game nr un RETTET TR ET 
r., 


3820 PRINT" syayns a YOUJARE,THE,MARBLE,KINGs ya» » 
Li} 
„u. 


Sue SL STREET LETEETERTRTETTETEEITERTTER) 
rs, 

SA PRINTYuwowEUrUnnr Tr EHER TFITTTENETITERU UN 
1." HI POKE65286 ,PEEK (45286) ORLE 

3858 COLORB,2:FOKE2397,8@ 

SO&R VOLA:RESTOREAUB 

3878 FÜRX=-OTD22 

TIER BETASF: IFAF<>""THENPRINT" HOHER)" APOKEZUD, Br 
RUN 

3899 READA,BıSIEmNDi ,%,B:S0UNDZ2,A+1,B 

san NEXTX 

3718 RESTORE488 

3922 GOTN3878 

SF3Q 3 

SPA REM MaHuunHHHNRUEEHNEN 

3950 REM #*# MARBLE MADNESS ### 

39760 REM wenn unnnuneneenuene 

397@ REM * BY ANDREAS NIKISCH # 

ZIEM REM KRUSE EUREN 

39970 REM #* * # # ENDE m un = # 

4BdB REM East EN 

ENDE DES LISTINGS 














<«191> 
<226> 
*x132> 
<221> 


<22> 
<z18> 
<95 
<497> 
<115> 
<bB> 
6537 
462> 


xal> 
513 
<59> 
<71> 


zi56> 
<23> 

<192> 
«2423 


<153> 
<Zan> 
<125> 
<155> 
<1974> 
<165> 
<32> 
<ıaa> 
<52} 
<59> 
<72> 
<1857 
<92> 








Mittels dieses Hilfsprogrammes 


Charader-Ge 


Es wird mit dem Joystick in Port 


Ist man mit der Erstellung fertig, die Farben wechseln. 


Möchte 





lassen sich sowohl einfarbige, als 
auch Multicolorzeichen kinder- 
leicht erstellen. Im Programm 
selbst ist außerdem noch eine An- 
leitung integriert. 


Der neue Zeichensatz liege im 
Speicherbereich von 


3C00 bis 3FFF. 
F2 = Multicolormodus aus 
F3 = Alter Zeichensatz 


1 gesteuert, 


Erstellung von einfarbigen Zei- 
chen: 

Zunächst wird der Wert 
{=Position des Zeichens im Cha- 
rakterspeicher geteilt durch 8) des 
Zeichens, welches geändert wer- 
den soll, eingegeben. Dann wird 
die Taste N für normale Zeichen 
gedrückt, Soll nun ein Punkt ge- 
setzt werden, muß man die Feuer- 
taste drücken. 


©-1& LISTING + CHECKSUMMEN {0C V1.8} 


5 GOT0O7?S 


B 1 ee ve ve ea Bere Te a a a ee a 1 a a a ee ee 
15 #r444Hrt+ CHARÄCTER CREATOR ++4+H++t++ 
DR +++ HH 
Zu 44 tt GESCHRIEBEN VON ++4444+++ + 
Sa +++++++#+++ ROBERT DILLINGER Hrttrrtrt 
SS Art 
AB are COPYRIGHT IC) 19986 +HH4Hrtrr 
45 ++4+++++ BY DILLINGERSOFTF 
SO HH HH 
55H 
6A +++++ FZ = MULTELOLOR-MODUS AUS #444 
65 H444r+ F3 = ALTER ZEICHENSATZ +444+++ 


x155>2. 
<2247> 
<181> 
<2534> 
<71> 
<350> 
<2497> 
<175> 
“234> 
<B> 
<135> 
«109? 
<134> 


+++ 


wird die SPACE-Taste gedrückt. 
Die Zeichenwerte werden nun er- 
rechner und im Speicher an der 
richtigen Stelle abgelegt. An- 
schließend hat man noch. die 
Möglichkeit, das erstellte Zeichen 
zu betrachten. 


Multicolorzeichen: 


Die ‚Steuerung entspricht der 
oben beschriebenen. Mit der 
F1-Taste kann man jedoch nun 


[= u 2 5 DE DE DEE EEE TE TE Zt 


&6 + NEUER ZEICHENSATZ LIEGT AB F3CHQ ++ 
BEZ ES LEE nn nn 


75 GDSUR1A0DO 
EM KEY1," SH" 


BS KEYS, "P (50365298 ,196:P (59365299 , ZB" +CHR$ (13) 
8& KEY2, "P(S0345287 ,B"4CHRE(1T) 


88 POKESS,B:FOKESA,59 
99 GOSURABAHDO 

108 POkKE#5287,8 

1B1 SCNELR 


192 COLORB,2,7:C0LOR1 ,1:COLOR4,7,4 


man eine Farbe von 1 - 8 haben, 
so drückt man nach der F1-Taste 
auf die entsprechende Farbtaste, 
Bei den Farben von 9-16 muß zu- 
sätzlich noch die CBM-Taste ge- 
drückt werden. 


Über den Monitor können die 
neuen Zeichen abgespeichert 
werden. 


C116/plus4 


<23> 
<209> 
<26> 
<154> 
<182> 
<71> 
<219> 
<70> 
<175> 
<36> 
<777> 
<92?> 


183 PRINT"NUMMERLSPAGEIDES{ISPAGEFZEICHEN, (SPACE) 
DASISPACEIGERENDERT {SPACEIWERDENSOLL?ISPACEI (B-1 








271" 


GSompute mib 








<239> 





5/87 


185 INPUTNR 

185 TFNR<BORNR>127THENGOTOLBS 

118 PRINT" {RYSONIMIRVSOFFHÄLTICOLORTSFACEIODERTS 
PATE RUSONYNIRVSOEFIÜRMALESTSPAGEYZEICHENTSPACEI 
u 

128 GETAFE IFAF="N"THENGUTOLAGG 

4138 IFA$="M" THENGOTDZERB 

148 GDOTO128 

10BB REM 

1818 REM+++++++ NORMALES ZEICHEN +rrt+t++ 

1028 REM+ HH HH 

1198 GOSUBSUaA 

1289 CHARI,Ib,I,"TRFSON SPACE RWSUEFY" 

1218 IFJuYt1)=7THENIFXILSTHENN=X- 1: FL=B: BOTOL ABB 
1220 IFJOY$1I=3STHENIFX<CZZTHENK=XH1:FL=B: GOTOLAEO 
1230 1FJDY LI) =ITHENIFYFITHENY=Y—1:FL=B: GOTOLA9B 
1248 IFJOY (1)=-5TNENIFY<SBTHENY=Y+L:FL=-B:GOTOL40B 
1392 IFJOY (1) @1Z2BTHENGOTOLSDO 

1318 IFJOYtJI=135STHENIFX>LATHENX=X-1: GDTOI SE 
1328 IFJOVtII=SISITHENIFRK<C2ITHENX=I +1: GUTOI SR 
13350 IFJOVIRI=I29THENIFY>1THENY=Y-1:6DTOLSAB 
1348 IFJOY 1) =135THENIFYSBOTHENY=-Y+1:B0T01508 
1368 GETAF: IFAFS="SPAGEI" THENGOTOARR 

1488 IFFL=1THENGOTO1S98 

1418 CHARI,X,Y,"IRVSON SPACE BVSGEF}"ıFÜRFEITDAG 
«NEXT 

1428: CHAR1 «R,Y,"ISPACEI”" 

1498 GOTO12Z1@ 

1SAB FL=1rCHAR1,X,Y, N ISPACEN" 

151M CHAR1,K,Y"TRFSOH SPACE RVSDFF}* 

1598 FORF=1T058: NEXT: GUTO1218 

ZB RE 

2210 REM++++++ MULTICOLOR ZEICHEN ++++4+ 

2928 REM+FFHHHe HH HH 

2050 GISLESBAR 

2108 GUSUBSRAR 

2209 COLOR ,ZF,ZL 

2218 IFIDY(1}=7THENIFX>L7THENX=X-2:ıFL=9: 560702488 
2229 IFIDY(1}=3THENIFX<SZZTHENX=X +2: FL=98: 50702484 
2238 IFJDYt1}=1THENIFY>LTHENY=SY-1:FL=92: GOTO2408 
2244 1FIDYt1)=STHENIFY<BTRENY=Y+r1SFL-B: GDT02498 
239@ IFJOY{1)=12HTHENGODTO2592 

2351@ IFIDYt1I=13STHENIFX>17THENX=X-2: G0T02508 
2328 IFJOY (1}=13LTHENIFXSZZTHENA=X+2: 60702598 
2350 IFJOY (1) =12PTHENIFY>1THENY=Y-1:B0T02508 
2348 IFIDYLLI=I3STHENIFY<CBTHENY=Y+1:5071T02508 
Z2IEN GETAF= IFAF="SPACEI" THENGOTO7BOR 

23790 IFAS=" {354} "THENGOTD2528 

2409 IFFL=ITHENGDTO2S8 

2418 CHAR1,KıYz"ERVSOH SPACEZ2 RVSBEFEI" A FORF=1T04 
Q:NEXT ’ 

242@ CHAR1,%K,Y,"LCSPACEZI” 

2478 GNT02218 

2508 REM FARDEN 

2519 FUAG=LICHARL,K,Y,"CRVSON SPACEZ RVSDFFY"SGO 
To2218 ' i 

2529 GETA#: IFPEEK{1347)=2THENGOTOZSUD 

2SIB IFVAL{ASI=FLANDAFS>"9" THENEOLORL,FI,LI14 CHAR 
1,X,Vr"IRVEON SPACEZ RVSGEF}":BOTO2218 

2500 EFVAL A) =FZANDASL "FH THENCOLOR1,F2,L2:CHAR 
1X, Yz"tRVSON SPACEZ RYSOFEI":GOTD2212 

"559 IFVAL tASI=ZFANDAFS >79" THENCOLORI ,ZF,ZLe CHAR 
I,XyYsNTRVSON SPACE2 RVSOFF}I"+GGTO2210 

2599 GOTO2528 

26BA IFPEEK (198) =56TIHENA=-7:GDT02708 

2614 IFFEEK 198} =59THENA>19:6G0T02700 

2629 IFPEEK 1198) =SBTHENA=11:60702748 

2434 IFPEEK(198)=1 I THENA=12:G0T02708 

244m IFFEERLIBISISTHENA=NS:GOTO270B 

2658 IFPEEK CLIOIFLTTHENA=14:GNTO278 

2688 IFPEER CLIBI=2ZATHRENA=1S: 60702720 

2678 IFFEER (199) =27 THENA= 14: GOTD2700 

Z6BU GOTD2EBE .. 

2708 : IFA=FITHENLOLGRI FI JLISCHAR1, X, YET IRKSOR SP 
AGER AFSOFFYI":GETORZ21O 

2718 IFA=FZTHENCOLDRI F2 LZECHARI1 ,K,Y,CRUSON 
ALE2 RPSUFF} "SBOTNZ21@ 

2728 IFA=ZFTHENCOLOR1 ,ZF,ZLECHARI ,K,Y,"CRVSOH 
ACET RYSOFFI"TGOTOZ21N 

2aaa GOTI2218 

BAAR REN+tFFHeHRH: HH 
sein REM++++ MULTITELUOR-FÄRBEINGABE +++ 
Za20 REMHHHHHHH HH 
35188 SENGER 

34a PRINT"GEBEISFACEIBITTEISPACEIDENTSPACEIFARB 
WERTISFACEIFUERTSPACEIDIE" 




















sp 


sr 








<12B> 
<45> 


x157> 
x227> 
*230> 
<205> 
<138> 
«<29> 
<159> 
*1355> 
x227> 
<151> 
x98> 
<188> 
539) 
<a8> 
<118> 
677 
<B> 
<129> 
<38> 
<x51> 


<48> 
<97> 
<i12> 
«221> 
<7> 
<208> 
<119> 
2337 
<138> 
<bt> 
<113> 
<17> 
<170> 
<103> 
<199> 
<> 
<35> 
<158> 
<77> 
<u3> 
<132> 
<52> 
<5B> 
<39> 


$216> 
<175> 
<250> 
<253> 


<91> 
<226> 


<254> 
xb6> 


<30> 

<108> 
<105> 
<125> 
239) 
<39> 

<1534> 
«1997 
<173> 
2287 
<195> 


<45> 
<B5> 
<217> 
<39> 
<98>: 
«135> 


<i18> 
<14> 


<29>- 


‚rıan 
' 7308 


programme 


53418 PRINT”1. {SPACEIHULTICOLORFARBELSPACEIEINTSE 








ACEILL-169" 
3420 INPUTFS 

3438 IFFI<LORF1>L6THENBOTOSABD 

3509 PRINT"GEBE{SPACEIBITTELSRAGEIDIECSPACEILUMI 
NANZSPACEIFUERLSPACEIDIE" 

3510 PRINT"1. tSPACEIMULTICOHLORFARBECSPACEIEINISP 
ACE> (O-79) " 

3528 INPUTL.A 

35I® IFLI<ZORLI>FTHENGOTOSSER 

370R PRINT"GEBESPACEYEITTEISFACEIDEN{SPACEIFARB 
WERTSPACEIFUERCSPACEIDIE" 

3718 PRINT"2. {SPACEIMULTICOLORFARBESPACEHEINISR 
AGEFLL-16) " 

3728 INPUTF2 

3738 IFF2< 1ORF2>LETHENGNTOS?OR 

BOB PRINT"GEBEXSPALEIRITTECSPALEIDIELSPACEILIML 
NANZISPACEIFUER{SPACEYDIE" 

ZA1R PRINT"2. CSPAGEIMULTICOLORFARBETSPALEIEINISP 
ACEFXD-77" 

3920 INPUTL2 

3938 IFL2<QURL2>7THENGOTOSERM 

4200 PRINT"GEBEISPACEIBITTELSPAGEIDENLSPAGEIFARB 
WERTISPACEIF-UERTSPACEIDIE" 

4018 PRINT" ZEICHENFARBE (SHACEIEINLSRACEI (1-8) " 
4020 INPUTZF 

AB2B IFZF< LORZFSBTHENGOTNAIGOD 

4180 PRINT"GEBETSPACEIBITTELSPAGEIBIETSPACEILUMI 
NANZLSPAGEIFUERLSPACEIDIE" 

41Q PRINT" ZEICHENFARBETSPACEIEINTSPACEI (B-7) * 



































24128 INFUTZI. 

4138. IFZL<BORZL>7THENGDTA410R 

4709 RETURN 

S98@ REM+H+FFHHHHH HH 
5905 REM4-+H+4+-44+440+ UMGRENZUNG +r++4HH ++ 
SORB REM HH 
S5g18 SCNHELR 

5813 COLORA,2,7 

SB15 PRINT" IBLACKIYZ 

5828 PRINTTARLLSI FIELEN" 

SBSB FORF=ITOBSCHARI,15 ‚15,F," CHI" scHARI1,24,F,"ice 
3"=NEXT 

59049 CHAR1,15,9, "167183" 

SU50 %=lö:Y=i 

S1B9A RETURN 

BAR RA + 
B1B REM+ ZEICHEN (NNRMAL) AUSRECHNEN ++ 
&D2B REM 
KHIRBR IFFL=I1THENCHARL,R,YS"IRYSON SPACE RVSOEFF” 
8118 IFFL=BTHENCHAR1 ,%,Y," TSPACE>" 

s20M AD=TQB8: N=B 


6380 
5420 
6410 
6508 
8510 
6520 
6530 
6548 
&558 
6 


AD=AD+AN:BY=B 

IFN=BTHENGUTOZGOBG 

WE=-25&4 

FÜORF=ADTOAD+F 

WE=WE/2 

IFPEEK ({F)=15RTHENEY=BY+WE 

NEXTF 

FOKELSSABHNRRÖHN,AY 

N=N+1 

GOTOA322 

FROG REM 
7819 REFH++++ ZEICHEN (MULTICDLOR) +4+++ 
444444444 AUSRECHNEN +H+HtHtHt+ + 

7028 REM 
IFFL=BTHENCHART „X, Vz ISPACEZI" 
AD=-TBBB: Na 

AD=AD+40:BY=9 

IFN?>=BTHENGOTOSBEBR 

WE=312 

FORF=SADTOAD+FSTERZ 

WE=WE/4 

IFPEEK (FI=15BTHENGBOSLUB77BO 

NEATF ö 
FOKE15365D+NRAB+N, BY 

N=N+1 

601073883 

IF (PEEK (F—-1824) AND1SI=F1-1THENBY=-BY+WE/2:RE 


7208 


7408 
7418 
758 
7519 
732D 
7538 
7540 
755B 
7688 
7788 
TURN , 
774 
RN 
77208 IF tPEEK (F-1824) ANDLSI?=ZF-ITHENBY=BY+WE/Z+RE 
RETURN 

7758.5TUP 

10D08 RE 


19910 REM+++ ZEIEHENSATZ VERSCHIEBEN +++ 


IF PEEK{F-1@24) ANDLS) =FZ-ITHENDY=BY+HELRETU 


Sompute mib 


<146> 
<13> 
<182> 


<B8> 


«2583> 
<125> 
<747 


747 


<174> 
<b1> 
<25> 


<133> 


<2b> 
<173> 
1723 


<1197> 
<46> 

<2067 
<123> 


<179> 
<iB3> 
<b9) 
<33> 
<197> 
<50> 
<62> 
<bb> 
<141> 
<97> 
<230> 
<79> 


<1B97 
<a5> 
<144> 
<141> 
<3B> 
<242> 
<B> 
<125> 
<974> 
<05> 
<12> 
<45> 
<47> 
<215> 
<x159> 
<134> 
<169> 
<19> 
<232> 
<31L> 
<18> 


<32> 
“397 
<Fä> 
«657 
<248> 
x63> 
<250> 
<947> 
<135> 
<48> 
<149> 
<235? 
<212> 
<15> 


33> 
<89> 
<232> 
<2443 


«75> 
<2R5? 























Programme 


REM+FrHrrHH HH FH 
RESTORE:FORF=151BATO1S134: READBY:POKEF „BY 


10928 
19959 
NEIXT 

12119 
12178 
19298 
19788 
zrann 
ZANAS 
zau08 
ZzuU207 
zue18 
20228 


FOKEAS2F8 ,FEEK (45298) AND2S51 

PIKE6S293 , 618 

5Y515104 

REIN 

REM HH 
REM--+++++++ ENDE {NORMALY +44++++++ 

REM HH HH 
GOSURZ1U0D 

SENELR 

LUARI „B, 18, "NOCHISPACEFEINISPACEIZEICHENS 


GETA$: IFA$="I" THENRUN:EBO 

IFAS="N"THENEND 

GOTO2ABS54 
REM 
REM+HA+t+ ZEICHEN AUSDRUCKEN +4+++ 
REM 

z11R9 SENCLR 8 

21288 CHAR! ,@,13,"'MDECHTESTISFACEIBAITSPACKHDASES, 
BACE) ZEICHEN {SPACEFANSCHAUEN{SPAGEH LIZNI 

21219 BETAF: IFAF="J" THENGOTO21I08 

21228 IFA$="N"THENRETURN 

212390 GOTO21218 

z13a9 FORF=BTOSISTEPZ 

21318 POKE3S5I2+F ‚NR: POKEZ3IZ4F+1 ,32 

21320 NEXTE 

21422 FORF=BTOSF 

21419 FOKESGF2+F,NR 

21420 NEXTF 

21502 CHARE „121,24, CFLASHONYDRUECKETSPALEIEINETS. 
PACEITASTE£ELASHOFF?" 

Z1608 BETAS: IFAS< >" "THENRETURN 

215819 GDT021488 

RER REM Het 

3993 REM++++++r ENDE (MULTICOLORI +4++++ 

Zuads REM HH 

ua? GBSUDF1AUE 

70215 SCNELR 

TAA7E CHNRI,8,10,"NOCHTSPACEIEINTSPACEIZEICHENTS. 
PAGE! W/NI TSPAGEI?" 

aG5a GETAF+ IFAS="T" THENRUNIRO 

SaNAaB IFAF="N'"THENEND 

msn GOTNZINSA 

HR REM HH HH 

IBI2 REM++t+++ ZEICHEN AUSDRUCKEN +rtrr+ 

SIAZB REM+Ft Fre 

SiIBa SENELR ä 

SIZeR CHAR1,9,13," CBLACKIMGECHTEST ISPACEIDUTSPAL 
EIDASTERACEF ZEICHEN TSPAGEFÄANSCHAUENTSPAGEI (I ZN" 
51219 GETA$S: IFA$="J" THENGOTOFISER 

31228 IFAF="N"THENRETURN 

31259 GOTOS1218 » : 

31300 POFEAS287 „PEEK 165287) DR1& 

313180 FOFRE&5302,F1-1:0Q=L1#143 POKEASSBZ „PEEK 165% 
02) +08 

31320 POKE65305,FZ-15 00=1L.2%16; PIKEAS3BI ,PEEKTA5I 
AIR 2 

31498 FÜRF=BTU3F5TEPZ 

31495 DU=ZL#i5 

31418 POKE2ZSAH-F ,ZF+7: POKERSHBHF ‚„PEEK (2548+F1 +00 
3142 POKEZSAB+F+L ,2F+7=:PODKE2S6SBHF +1 ‚„PEEK 125484 
+1)+90 
31438 
51448 
FIsaR 
31518 
31528 


zanaR 
20DS8 
zıaan 
21830 
21922 














FOKESSYFZHF „NR: POKESSI2HF+I „32 
NEXTF 

FORF=BTO3F 

POKEZ&AH#F „2F+7: POKEZS468+4F ‚PEEK (2548+F) +HQ 
FOKES6572+F „NR er 
31530 NEXTF 

31&8B CHAR1,11,24," {BLACK FLASHON>DRUECKETSPAREI 
EINEISPAGEITASTETELASHOFFF” 

31708 GETAF: IFASTY""THENRETURN 

3171@ GOT031708 

4BRaB REM 

ABB REM++T++HHtHH+ TLITELBILD ++4+444+4++ 

4a027E REM 

AN0SG SCNELR 

ABRS52 COLORB,1 

ABDSA CHORA,I 

4ea72a COLOR1,8,7 R 

AnaBe COLOR ,14,4:CHAR1,11,0, "ROBERTISLPACEIDILLI 
HBER '6" 

AnaFa CHLORI,15,4 

AP1UB FRINT=FRINT"ZDONNZ SPACE2 RVSOH 





SPAGEI RVS 


= ZES 








<20> 
<a> 
<35> 
<110> 


<B&> 
<154> 
<08>? 
«953 
<161> 
<72> 
<179> 


<1> 

<164> 
x1979> 
<249> 
<ı81> 
xa> 

<226? 
%157> 
<175> 
<245> 


%179> 
x59r 


BEE SPACE RVYSON SPACE AVSOFF SPACE RUSON SPACE R 
VSOFF SPACE2 RVSON SPACE RVSOFE SPACE2 RVSON SPA 


GER 
CEZ. AWSUFF SPACES RVSON SPACE 











air 


SPACE, RVSOFE SPACE2 RVSO 
N SPACE3 RVSOFF SPAGE RVSON SPACES RVSOFF SPACE 
RVSON SPACE3 RUSOFF SPACE RUSON SPACE2 RUSDFFY" 


301120 PRINT"{SPACE2 RVSOH SPACE RVSOFFE SPACEI BV, 
SON SPACE RVSDEE SPACE RVSOH SPACE RVSOFF SPÄCE 
RUSON SPACE RYSOFE SPACE RVSOH SPACE RUSOFF SPAC 
E RVSUH SPAGE RVSOFE SPACE RVSON SPACE RVSOFF SP 
ACE RVSDN SPACE RVSOEF SPACE, RVSON SPACE RVSOFF 
SPACE RVSOM SPACE RVSOFF SPACE RVSON SPACE RVSO 


LE RVSUFF SPACE AVSON SPACE RWSOFE}" 
40128 PRINT"CSPACEZ RVSON SPACE RWSOFF SPACE3 RV 
SON SPACEI RVSOFF SPACE RVSON SPACEZ RVSOFF SPAC 
E RVSON SPACE2 RVSBEE SPÄCE2 RVSOH SPACE3 RVSDFF 


SPACE RVSON SPACE RUSGFF SPACE KVSON SPACE RVS 


























ACEZ RVSDFFI", } 
40130 FRINT"ISPAGE2 RVSOR SPACES AVSOFF SPACE RW 
SON SPACE RVSGEF SPACE RVSON SPACE RVSOEF SPACE . 
RVSOM SPACE RVSGFF SPACE RVSON SPACE RYSOFF SPAC 
E RVSON SPAGE, RYSGEF SPACE RVSON SPACE RVSUFE SP 
ACE RUSON SPACE RWSOFF, SPACE RVSON SPACE RYSOFF 

SPACE RYSON SPACEI RVSOFF SPACE2 RVSON SPACE RVS 
BEE SPACE2 RVSUN SPACEI RVSOFF SPACE RVSOH SPACE 


RVSUFF SPAGE RVSON SPACE RVSOEFY" 






































A228 FRINT= PRINT 

AOZAR COLOR1,15,3:PRINT"”{SPACES RVSON SPACEI RVS 
GEF SPAGE RVSON SPACEZ2 RYSDFF SPACE2 RVSOH SPACE 
I RVSOFE SPAGEZ RVSON SPACE RVSUFF SPACE2 RWSON 
SPACEZ RFSUFE SPACE RVSGN SPACEI RVSOFE, SPACE RV 
SON SPACE2 RVSOFFF" ’ 

49318 PRINT"ISPACE& RESON' SPACE RYSOEF SPACE3 AV 
RVSON SPACE RVSOEF CI2 SPACE RVSOH SPACE RYSOFF 
SPACE RVSON SPACE RVSOFF SPACE2 RVSON SPACE RVSO 
EE SPACE? RYSON SPACE RVSUFF SPAGE RVSON SPACE R 
VSOFF SPACE RVSON SPACE RVSOFF SPACE AVSON SPACE 
RYSDOFEF?" 

48320 PRINT"ISPAGES AVSOR: SPACE RVSOFF SPACEI AV 
SOH SPACE2 RVSOFF SPAGE2 RVSOH SPACE CI2 RVSOFF 
SPACE RVSON SPACEI RYSBEF SPACEZ RVSON SPAGE RVS 
OFF SPACEZ RVSOH SPACE, RYSGEF. SPACE RVSON SPAR 
RVSOFF, SPACE RVYSDN SPAUE2 RVSBEFI” : 
33338 PRINTPISPACES RUSON SPACEI RVSOFF SPÄCE RW 
SUOH SPACE RVSOFF SPACE RVSOR SPAGE RVYSOFF SPACE 
RVSOH SPAGEI RVSGFF SPACE RVSON SPACE RVSDFF SPA 
CE AVSOH SPACE RVYSOFF SPACE2 RVSOH SPACE RVSOFF 
SPACEZ RVSON SPACEA RVSOFF SPACE BVSON SPACE AVS 
OFF SPACE RVSOH SPRACH, RUSOFFI“ 
49500 GOLOR1,8,& ns 

495318 CHAR1,11,1&,"CODPYRIGHT{SPACEI IC} ISPACEI FO 
u" 

40520 COLORI,A,4: CHAR ,12,10,"HYISPACEIDILLINGER 
SOFT” u 

40580 COLORI,2,% 

AB61R CHAR ,16,241 5" TELASHONFDRUECKETELASHBFEN" 
AULZB CHAR1,4,22," CRVSONFSPACEERVSUFE SPACEFUMTS 
PACEIDASTSPÄACE PROGRAMM (SPACEFZUTSPALCEISTARTEN" 
40635D8 CHAR ,5,235,"{RVSONFAIRVSOER SPACEILMI{SPACE 
FDIETSPACEFANLE TTUNGBTSFATEFANZUSCHAUEN" 

AUFUO POKE239,B 

ADFLE GETAF: IFAS="A"THENGOTO41ORU 

AD9ZB IFAS=" SPACE) "THENRETURN 

40938 GOTO4BI1R f 

a1gaB REMIH+tHrrrLrH Herr etetH 

A1D1® REMi+++r+++H+ ANLEITUNG +4r44H4rH444+ 

2419820 REM HH 

41129 SENELR 

41118 CHARL,B,I ,"CCKARFZUNAECHATISPACEIEINIBEISP 
ALE}GRUNDSAETZL.ICHETSPACEF INFOS ® 

412988 PRINTICOLORI „3,4: PRINT 

41218 LISTIQ-SB 

41398 FORFS4TDLELCHARI ,B,F,"TSPACEZY" NEXT 

41408 TOLORI,B,6rCHAR1,14,22,"{FLASHONIMOECHTEST 
TSPACEIDULFLASHUFEF" ’ { 

41418 CHAR1,14,23, "TRVSONIRERVSOFFEIÜORMALELSPAGEI 
ODER" " 

41428 CHARI,5,24," {RVSORYMERVSOEFIULTICOLORTSPAC 
EIZEICHEN{SPATCEFERSTELLENISPAGEI?" 

41508 FOKE239,8 \ 

41688 GETAFI IFAF="N"THENGENTOA2BED 

416518 IFAF="MYTIIENGOTOAZARB 

41628 GOTOI1ED 

41789 END 































































































Gompute mib 


ER con 


697 


<141> 


x249> 


<227> 
<125> 


“143> 


x2> 


5343 


<144> 
31593 


«1&4> 


<177> 
x229> 
<1972> 


<32> 


<187> 
<2157 
32393 
x70> 

251? 
“2203 
<202> 
«2407 
SzB> 


<227> 
<252> 
<a97> 

<198> 


«2157 
<i03r 


<187> 
<S5a> 
<535> 
<1901> 
1623 
«207> 
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programme 


























42089 REM EHE <200> | ACEISICHISPACEIUMTSPACEYDIETSPACEIFARBETSPACEIL- 

32019 REM+++4+ ANLEITUNG {NDRMAL) +++0++ <166> | 16" <126> 
42828 REMTHHHHt <220> | 43480 PRINTTARt16) "HANDELT, ” x23> 
421299 SCNLCLR <o> ISGDR CHAR1,16,24," {ELASHON VELLONJFERTIGTSPACEI 

42209 FRINTTABC12)" CYL.GRNFNORMALEISPACEIZEICHEN PIELASHOEEI" <187> 
” <123 43618 GETAFI IFASZ >" "THENRETURN <B9> 
42218 GOSUBISARA <234> | 43420 GOT043618 <133> 
42309 CHARL,16,24, "TFLASHON YELLONIFERTIGISPACEI 45000 FRINT"LL.BLUFV <167> 
FTIFLASHOFEI" <152? | 45109 CHAR1 ,@,5, * ZUNAECHSTISPALEIGIBSTCSPACEIDUT 

423510 BETAS: IFASC>"" THENRETURN <b4> SPACEIDIETSPACE?VERLANBTEN{SPAGEIWERTE" <152> 
423208 BOT042310 <93> 45112 PRINFEPRINTTAB(IRI "EIN." <63> 
330008 REN HH <179> | 45128 PRINT=PRINT"MITTSPACEIDEMISPALENIOVSTICKES. 

ASB1B REM+++ ANLEITUNG (MULTICOLOR >) +++ <218> | PACEIFORTISPACEIL I SPACE} BEWERST{SPACEIDUTSPACE 

ADB REMIFEHTFIHe rt + «<Zu8> +DEN" <sa>r 
43129 SENCLR <236> | 45132 PRINTTAR (17) "CURSOR." <237> 
4520 PRINTTABLLIF"LYL.CANIMIR_TECOLORTSPACEIZEIC 45220 PRINT: PRINT"ISPALEIWILLBSTTSPACEIDUTSPALEIT 

HEN” j «09> NNERHALB{SPACEFDESTISPACEHZEICHENFELDES" <149> 
43214 GDSUBASEUG «214> | 45239 PRINT"EINEN{SPABEFPUNKTISPACEIBETZEN, tSPAC. 

433508 CHAR! „16,24, "IFLASHON YELLONIFERTIGISPACEI EIDANNLSPACE?DRUECKST ISPAGEIDUESPACEIDIE" <i> 
TLELASHOFES" <142> | 45240 PRINTTAB<(15}"FEUERTASTE. " <3> 
A312 GETA$T IFAFCY""THENGOTO4SABD <144> |. 45308 PRINT=PRINT* (SPACE2IBIST ESPACEIDÜHSPACEIFE 

43328 GOTO43S1B <76> RTIG, TSPAGEIDANN{SPALEIDRUECKSTISPALEIDUCSPACEID 

AZ4RQB SCNELR x <25> IE” <70> 
43412 CHAR1,0,3,"tL.BEH SPACEZIMDECHTEST ISPACEID 4531@ PRINTTAR{14) " {RUSONISPACELRVSDFF SPACEITAB 
UISPACEIINISPACEIDERTSPALEI ZWISCHENZEITSPÄGENDI TE." <aD> 
ES ; <192> | 45520 PRINT4PRINT"tSPAGCEIESTSPACEIWERDENTSPALEID 

43428 FRINT:PRINTTAB(SI "FARBE {SPACE} AENDERN, {SPA ANN{SPALEIDIETSPACE WERTE CSPACEFENTSPRECHEND" <120> 
LCEIDRUECKSTISPACEIDUTSPACE RVYSONYFITRVSOFF SPACE, 45328 FRINTTAB (15) "BERECHNET." «35> 
FUND" <19> 455908 REIURH <2351> 
43438 PRINT"DIETSPAGEFJEWEILIGETSPACEIFARBTASTE, HB REMIFAHEHA “94> 
XSPACEIWENN{SPALEYESTSPÄACEHSICHLSPACEN.MN® <161> | sam1B REM++++4* VERSCHIEBERDUTINE +4+44+ <128> 
43442 PRINTTAB (9) "DIETSPACEHFÄRBELSPACEIL-BISPAG ENB2B REM HH <114> 
EIHANDELT" : <147> | &oLaD DATA162,2,199,0,206,157,0,60,189,8,209,157. 

43450 PRENTTAB (18) "ODER" <174> ‚8,61,189 & <2455> 
A3465B PRINT"DIEISPACE RYSONICRMIRVSOFFI-TABTEISR 60118 DATAR,210,157,8,62,189,0,211,157,0,63,232, 
ACEFUNDLSPACEIDIETSPACEIJEWEILIGETSPACEIFARB-" <218> | 240,%,76,2,59,96 <150> 


43478 PRINT” CSPACEHTASTE , {SPAGEIWENN(SPALEIESISE 


ENDE DES LISTINGB 





Quadrato 


Ds rn TI CR 


sam ansteigender Schwierigkeits- 
grad mit immer komplizierteren 


Bildern und immer weniger Zeit 


wird so manchen zur Weissglut 
treiben. Wir können dies ‚gut 
beurteilen, schließlich haben wir 
es Stunden in der Redaktion gete- 
stet. 


Das Programm wurde so enit- 


nicht notwendig ist. Floppybesit- 
zer müssen lediglich vor dem er- 
sten Programmstart den Highsco- 
reersteller ab Zeile 21000 direkt 
anspringen. Geben $ie zu diesem 
Zweck den Befehl GOSUB 
21000 im Direktmodus ein. Da- 
nach kann das Programm garız 
normal abgespeichert werden. 


Daß es außer “Weltraumgeballer“ 
und andere Action auch andere 
interessante Spiele gibt, ist leider 
rur den wenigsten bekannt, Aus 
diesem Grund haben wir uns dies- 


mal entschlossen das Spiel QUA- tätigen Sie den Feuerknopf und = nn j a ES IRENERTNNE. Eu 
DRATO zu veröffentlichen. Die- der augenblickliche Bonus wird 3 REM « 1797 - C44 VERSION F. BRALL * <227> 
sesSpielhareineschlechte Grafik, zu Ihrem Score hinzuaddierr. 4 REM # EIN TAKTIK Li. STRATESIE EPIEL * <235> 
i S x Ü ne 5 REM = FÜER KASSETTE UND DISKETTE + <18> 
a BEN Sound, keine La Pe * au De Moor 5 REM ERnRURa HEUER ERERRH 95 
serkanonen oder sonstige moder- ‚euerknopf so wird der au 7 gem « HIGHSCORETABELLE NUR AUF DISK # <136> 
ne Ausstattung und ist trotzdem genblickliche Bonus abgezogen. B REN HERE <11> 
Spitze, DasSpielhabeichzumer- Daß Ganze sollte möglichst nn ne ee <245>, 
; PAR a IELF! <127> 
una a 5 ell a Ren ar 41 DIM FENSTER (3,3) ıREM FENSTER <93> 
senen. Es geltel mir So gut, dals Ic bonus laufen untergezaält 42 DIM HNS(#) REM HIGHSCORE NAME <tll> 
mich entschloß,; diese wird. Ist die Bonusanzeige bei 0 ı3 Dım 45 tF)1REM HIGHSCORE PUNKTE <124> 
C64 Version zu schreiben. , angelangt, so ist das Spiel beendet, = a a 
De 5 : 53281..8ı 
Nr . und Sie können sich eventuell in >, gneus spe@ds REM COPYRIGHT <238> 
Das eigentliche Spielgeschehen ist der Highscoretabelle verewigen. 

x 5 : BEN: : : N. 28 GUSUB 22BBBı REM HIGHBCORE INIT <13> 
denkbar einfach. Auf einem Spie- Übrigens bei den Diskettenbesit- 460 ı <98> 
brett von 9 mal 9 Feldern Größe zern wird der Highscore automa- 98 cx=1 as, ie CURSORPGSITION <229> 
werden zufällig Steine verteilt. tisch abgespeichert und bleibt so- 5 _MWATRATE = 28 N 
Nun sucht der Rechner, ebenfalls mit für alle Zeiten erhalten. Bei io» S_e-nen nee En 
zufällig, eine Kombination von 3 den Kassettenbenutzern bleibt die 194 Ba-S:REM BONUSARZUB c54> 
mal 3 Steinen aus diesem Feldher- Highscorerabelle nur bis zumAus- 162 GOSUB: 17BBR:REM BILDSCHIRM INIT <184> 

RER ri f B7 GOSUR 24208: REM SORTIERE <230> 
aus und zeigt diese in einem klei schalten erhalten. .  1@B GOSUB 25080: REM HIEHSCORETABELLE <58> 
nen Fenster an. Ihre Aufgabe ist Das Spiel ist nicht so einfach, wie 1g B-2ESN:+ REM BONUS SCORE <an> 
nun,blitzartig diese Kombination es sich vieleicht anhört, ein lang- 111 N=@:REM FLAG FUER NEUES BILD <36> 


auf dem Brett zu finden. Zu die- 
sem Zweck steuern Sie mit einem 
Joystick in PORT 2 einen Cursor 
von 3 mal 3 Feldern Größe, Ha- 
ben Sie das Feld gefunden, so be- 


wickelt, daß.ein Umschreiben für 


Und nun viel Spaß ! 
Kassetten und Diskettenbenutzer 


Frank Brali 


C-64 LISTING + CHECKSUMMEN IC Vi.8) 
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programme 


115 GOSUB 109@0:REM ZEICHNE BRETT 

120 BOSUR 11098: REM ZEICHNE FENSTER 

159 GOSUB 140AB:REM ZUFALLSFELD 

169 BOSUB 1S5008:REM UEBERNEHME FENSTER 

170 G0SUB 14008: REM JDYSTICK/CURSOR 

459 B=B-BA: IF B<@ THEN B=B 

455. POKE 54296, 15:POKE 54276, 03 POKE 54275, ZA: POK 

E 54277,5:POKE 54276,17 

490 1F {2 AND 16)=B THEN GOSUR 19000 

SOd BUSUB 1MABB:REM ZEIGE BONUS 

524 IF N-1THEN POKES4296, 15: PIKE 54276, B: POKES42 

73,48: POKES4277 ,10:POKE 54276,17 

595 IF N=1 THEN P-P+1rQUATRATE-QUATRATE+L:BA=BA+ 

1:6070 110 

Sio IF 9>@8 THEN 170 

511 POKE 54276,0:FOR F=238 TO 38 8TEP -@ 

512 FOR I=1 TO 1@ =NEXT I 

51T POKES4294, 15: PÜKES4273,F APOKES4277, 111 PDKE 

54276,17 

S1A NEXT F 

515 GOSLUB 2400A:REM SORTIERE 

529 GOSUB 23BQQ:REM HISHSCORETABELLE 

&D0 PRINT" CYAN HOME BOWNZ2 SPACEIANDTHERLSPACEI 

GNME LSPACEIV/NISPACE2F * 

618 GET E$:IF E$="" THEN 618 

628 IF Et="Y" THEN £i@ 

638 IF ES="N" THEN 50 

549 GOTD #19 

659 PRINT" CLEAR BLUE BONN SPACEHDIESEB{SFALEITR 

DNIC-PRUGRAMMESPACEIGIBT (SPALEIES" 

660 PRINT” [SPACE AUCHLSPAGE HFUER CSPACEIDENLSPALE 

3ATARI „ECIATSPACE} UND{SFAGE> TRM{SPACEFPEISPACEF !M- 

670 PRINT"tEYAN DOWN SPACEYCHAFCIA/IBMISPACEIVER 

SLONLSPALEI BEI TSPACEIF „ BRALL® 

END 

ıuD2U REM ZEIGE BRETT 

1281D PRINT"IHDHE YELLOW RYSON CA SC ER 
23) 




















‘EB 
B 
& 


18815 FOR I= i 108 
12428 PRINT"LAVSON SB SPACE SR SPACE SB. SPAC: 
SPACE SU SPACE SB SPACE SE SPACE SB SPACE SB SE 


ACE 587“ 
sc. Er Sc. Se SC, Se sc ze sc 


ia 
8 








12U3A PRINT" TRESOH 
S+ SC Sr SC Sr SC 
108955 NEXT I 

18n4B PRINT” {RUSOH PACE SE SPACE SB SPACE SB 
SPACE SB SPACE SB Space SB SPACK SB SPACE SB SP 
ACE 583" 

12058 PRINT"{RWSON CZ. SC CE sc CE SC CE SC CE-SE 
CE SC CE SC CE SCCE SE cx3" 

1@asi PRINT"tEYAN SPACESIPIETURE:"P 

18952 FOR Y=' 1 TD FıFüR X=1 TO 9rBRETTIX,YI=BsNE 
XT X,Y 

10055 RETURN 

1@B6M 3 

t1BD9 REM ZEIGE FENSTER 

11405 PRINT"IHOHE GREEN RVSON}"J 

11P10 PRINTTAB(23) "{RFSON CA SC ER SE ER SC 653" 
11215 FOR I= ı 10 2 

11020 PRINTTAB(23) "(RVSOH SB SPACE SB SPACE SB S 
PACE &B}" 

11038 PRINTTAB{23)"(RVSON Ca SC Sr SC Se SC cur" 
11835 NEXT I 

1104@ PRINTTAB(2S)I "IRVSON SB SPACE SB SPACE SB S 
PACE SB" 

11058 PRINTTABLZII"IRVSON CZ SC CE SC CE SC 6X?” 
11652 FOR Y= 1 TO S:FOR %=1 T0 SsFENSTERCX,YI=Br 
NEXT X,Y 

11055 RETURN 

11050 a 

12000 REM SETZE STEIN (VARIABLE X,Y) 

12018 PRINT”{HOHE DGHN} *ı 

12812 BRETT(X,V)=1 

12915 IF Yel THEN 12030 

12929 FOR I=1 TO Y-Az=PRINT" {DOHN2I"4eNEXT I 
12930 PRINT TABtli+tX-13#2))"{RVSON DLUE SPACE R 
VSOFFI" 

12DA4B RETURN 

12058 a j 

1FAU9 REM SETZE FENSTERSTEIN {VAR X,Y2 

13218 PRINT"CHONE, DOHNY" 

13912 FENSTERIN,YV)=1 

13A15 IF Y=l THEN 13030 

13820 FOR I=1 TO Y-1s PRINT" {DOWHZI"FANEXT I 
1383590 PRINT TABTAZI+X-IIAZI) "TRVSON BLUE SPACE 
RESOEFF" 


\ [ek 
® 














<34> 

<207> 
<195> 
<225> 
12267 
17953 


x48> 
x46> 
<214> 


«2277 
x1> 
<73> 
1687 
«213> 


237) 


"<$Br 


<128> 
<216> 


<«iAl> 
<28> 
«117> 
<107> 
«282> 
<179> 
<3> 
z1> 
<a2> 
<29> 
<48> 
«1937 
<144> 


<135> 
<ı1a> 
<1645 


<1351> 
<1855 


<ı1B1> 


<252> 
<173> 
<185> 
<120> 


<2A&> 


<127> 


5? 
<172> 
x78> 


<25> 
<1974> 


<146> 
«232> 
<153> 
<78> 
<126> 
<am> 
x38> 
«182> 


<159> 
<197> 
<123> 
<205> 
<1D6> 
x19> 
<25> 
<B2> 


<16> 


17032 RETURN 

13059 x 

12209 REM ZUFALLSFELD 

14819 FÜR T= 1 TO QUATRATE 

19028 X=INT {RND(II#WI+1 

14938 Y=INTIRND(1II#YI +1 

14249 6OSUB 120008 

14058 NEXT T 

140&B RETURN 

14070 7 

150DM REM UERERNEHME IN FENSTER 

15829 XF=INT {RND(1)#7) +1 

15230 YF=INTERND{1YR7) +1 

isa4Q FOR Y= 1 103 

isosa FOR x= 1 103 

15860 IF BRETTCKF+X-L,YF+Y-1)=1 THEN BOSUB 1300 
15@7@ NEXT X:NEXT Y 

15@B@ RETURN 

15090 : 

164@Aa REM BEWEGE CURSOR (JOYSTICK) 

16028 POKE 56322 ,244 ; 

16025 J=PEEK (56328) 

16028 IF (3 AND 15)= 15 THEN 16146 

14030 SY3 49152,CY,CX,7:REM CURSOR LUESCHEN 
145042 IF 3 AND IIeR THEN DY=CY-1 

14058 IF tJ AND 2)=B THEN CY=CY+1 

15069 IF (d AND M=B THEN CHSCK-i 

15979 IF td AND WM=-B THEN CXecX+1 

1.1a@ IF CX>7 THEN Ci=7 

1611@ IF C4<i THEN C4=i 

16128 IF CY>7 THEN CY=7 

14138 IF CY<i1 THEN CY=1 

1d140 SYS 49152,C0CY,CX,B 

16158 POKE 56322 ,255: RETURN 

18180 » Bi 

17a26 REM BILBSCHIRM INIFIALESIEREN 

17085 PRINT"{CLEAR DOHH RIGHT31 YELLOHFQURDRÄTO”" 
17886 PRINT"{RIGHTZL YELLOWYLFBFXSPACEIBEI" 
17807 PRINT" {RIGHT31 YELLOM SPACEIF.BRALL" - 
17910 PRINT"CPURPLE DOWN4 RIGHTZBIHIGHSCORE SPAR 
E}r [SBIFTSPACEF" 

17020 PRINT"{DOHN RIGSHTZ2B7BONUSSFOREr CSHIFTSPACE 
3” 

178358 PRINT"CDOHWN RIGHT28>YGQURTSFAGEISCORE: {SHIF 
TSPACEI" 

17198 GOSUB 22000 

173948 RETURN 

17310 ı 

19208 REM ZEIGE BONUS 

18818 PRINT"IHHITE HOHE DAWNIA RIOHTST SPACES [1 
FT5}"B 

18198 RETURN 

19118 » ö 

ıimeRm REM FENSTER en 2 
197995 4=B 

19B19 FOR v=-B TOD 2 

17015 FOR X=8 TO 2 

17020 IF. BRETT (CX+X ,CY+Y) <>FENSTER(K+1,Y+1) THEN 
U=1 

190359 NEXT KıNEXT Y 

197048 IF U=l THEN 3=5-B:N=B 

17040 IF U=@ THEN 5=5+B:Nel 

1907@ IF Us1THENPIKES4296, 15: POKES4274 ‚U: POKES42 
73,681 POIKES4277, 10: POKESAD76, 17 

17068 GOSUB 232808 

17189 RETURN 

1711@ x 

zuUwaD REM ZEIGE SCORE 

2aa1@ PRINT"HHITE HOME DOWNI12 RIGHTIIL SPACES LE 
FISY"S 

zuiag RETURN 

ze110 » } s 

zıe009 REM Het 

zıupi REM # DIESES UNTERPROGRAMM ER- %* 

zZ1@@2 REM # STELLT DIE DISKETTEN HIGH-# 

21003 REM = SCORETABELLE. nr 

210B4 REM ua EURER 

21018 UPEN 1,8,2,"&:0S5CR,5,W" 

21@11 FOR I= 1 T0? 

21828 PRINT#1,“FRANKTSFALCES}" 

21824 PRINT#1 ,1%3508 

21958 NEXT X 

zıasaa CLOSE 1 

21859 PRINT“ tDONNYHIGHSCORETABELLE (SPACE FWURDELS 
PAGEIERSTELLT {SPACE} !" 

21968 RETURN 














Compube mib 


<176> 
“182> 
<149> 
<2@4> 
<41> 
<52> 
x97> 
<b6> 
2176) 
<102> 
IE 
<64> 
«75> 
<109> 
<117> 
<54> 
<189> 
<176> 


<AAZ>- 


<95> 
«773 
42472 
4237> 
<19> 
<164> 
K166> 
<17&> 
<1F1> 
<299> 
<177> 
224» 
<2B9> 
<183> 
<195> 
<153> 
<2> 
<77> 
<165> 
<196> 


<7> 
<149> 


<152> 
<95> 
<1@1> 
«27> 
<1B8> 


<> 

<136> 
<62> 

<197> 
<208> 
<245> 
<248> 


<130> 
<69> 

<205> 
<224> 


<B> 
<35> 
<116> 
<42> 
‘244> 


<42> 
<I> 
<22> 
“Ir 
<94> 
«977 
151? 
<13> 
<47> 
<220> 
<124> 
<69> 
<148> 
<132> 


<a> 
<36> 
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zı870 a 

22URE REM HIGHSCORE INIT/LADEN 
22018 IF PEEK(135)=8 THEN 22188 
22815 FGR I= 1 TO 97 

22028 HN$ (13 ="FRANKISPACER}”" 
22824 H5S{D=1*«3508 

22030 NEXT I 

27D4B RETURN 

22270 u 

27108 OPEN 1,8,2,"ÜSCER,S,R” 
2z118# FOR I= 1 T0 9 

271208 INPUTAI.HNFCI 

22138 INPUT#L HS) 

22148 NEXT E 

221580 ELOSE 1 

22160 RETURN 

z2ı17U & “ 
23009 REM HIGHSLORETABELLE ANZEIGEN 

23B1B PRINT"CHOHE DOHKI43":PRINT TABIZB) "CRVSDR 
GREEN SPALCEIHIGHSCORETABELLEISAACEZ LIG.BIUEY" 
23958 FOR I=i TO B 

23058 PRINT TABLLPITYLLEFTI TSPACEI TLEFTFCHNS CI) 
„Pr ""HSCH 

23870 NEXT I 

2310@ RETURN 

23118 c£ 

zaaua ‚REM SORTIERE HIBHSCORE 

24418 HNEII=H" 

24020 HSI9M=5 

24058 FOR I=1 10 4 

24948 FOR Tr-1 109 

zZa0s0 IF HSCTI<HSTII THEN GÜSUB 24508 

2A062 NEXT TıNEXT I 

24972 HS=HS{1):REM HIGHSCORE ” 

242AB GOSLAR 25088 

zs1ıBa FOR I= 1 TOB 

24118 IF HNSCIIKCH"I" THEN 24138 5 
24129 FRINT"CHOHE DOHNZZ YELLOH SPALEINAMEI SPAR 
Er"; 

24122 INPUT HNSLII EHNSCTISHNE CHI + ISPACEL EI" 
24125 GOSUB Z&80B: REM SAVE EEE 

24138 NEXT I 

2438B RETURN 

Z4310 = 

245RB MS=HSLCIISMSSHNSCII 

24518 HS{I}=HS{T} eHNSLII=HNELTI 

24528 HS{TI>=MS:HNFCTI=ME 

24538 RETURN 

245408 ı 

25009 REM ZEIGE HIGHSCORE 

25012 PRINF" HUITE HONE DOWNS RIGHT3L SPACES LEF 
ZSI"HS 

2519 RETURN 

25110 d 

2&B08 KEM SAVE HIGHSCORE 

ZUUB5 IF PEEK (185)=1 THEN RETURN 

26R1B OPEN 1,B,2, "@sQSCR,6,W" 

285828 FÜR I=1 T0 7 

2&83B FRINT#AL,HNS ICE) 

25849 PRINT#HL,HSCD 

248590 NEXT I 

Zus CLOSE 1 

265879 RETURN 

25000 : 

Ssanad REM ANFANGSBILD INITIALISIERUNG 

FWO1A PRINT"ICLEAR DOHNZ YELLON SPACEIZIGOTSPACEI 
ULSPACEHALSPALEIDISPACEIRLSPACEIAISPALEITIGPACEI 














oO 

Ssa02G PRINT"{DOHN SPACELSITCAHTSPACEFVERSIONTSFAC 
EIF. ASPACEFBRALL" 

SONISO PRINT"IDGHN SPACELS? EN} SSPACLEY 1997" 

Sau PRINT" TDOHNI24 GREEN SPACESYBITTELSPALEIWAR 
TEN{SPACE?ICHTSPACEIPOKE SPACE SDATENTSPACEIY 
I0502 GOSUB AUBGB: REM MUSIC INET 

39510 GOSLB AHUBDMıREM CURSOR MC-ROUTINE 

Su515 PRINT"CHOHE DOWNZI CYAN SPACE7T}FPRESSLSPACE 
FANYESPACEIKEYTSPACEITDISPACEHLONTINUETSPACETY" 
3951& POKE 198,8 

38517 GET Ef:IF E$="" THEN 38517 

sasi1e8 SYS 48752 

34528 RETURN 

zu53G = °- 

ABBAB REM ### MUSIC INITIALISIEREN "er 

Anm u 

4a002 DIMH (75) :FORI=BTOF 

A40nG3 Hi48+T)=1ıHt&5+1)=I+1R: NEXT 


























<218> 
<127> 
<142> 
<2@3> 
<243> 
<187> 
<128> 
<«232> 
<218> 
s231> 
“433 

<117? 
<aa>r 

«230> 
%222> 
<116> 
<a2> 

<221> 


<189> 
<213> 


<1B2> 
<149> 
<I6> 

<R1B> 
<997> 

<149> 
<185> 
<ıra> 
<210> 
<32> 

<146> 
<148> 
<204> 
<2437 
<252> 


<130> 
«785 
x229> 
<1898> 
<216> 
1423 
269? 
<ı1B7> 
<57> 
<ı71> 
<117> 
<14> 


<19> 

“2527 
<178> 
<ZBB> 
<153> 
<282> 
<128> 
«224> 
<145> 
<59> 

<51> 

<201> 
<1277 
<235> 


<107> 


«7> 
%3977 


<235> 
<29> 
<39>, 


x35> 
<43> 
<209> 
<84> 
<b1> 
S243> 
5l> 
237 
£15> 
<28> 


sHARa 


programme 


aaa 
49985 
ram 
AmaB7 
ARAABE 


FORI= 409474 TO 499553 zREADAF 
HSASCLLEFTF AS, 1?) 
L=ASCIRIGHTFLAF,LI? 
D=H (HI #15+H LI) 15=StD: POKET,D 
A=A+lı IFA<ZBTHENNEXTıA=-1 
40007 READY: Z=Z+13 IFVSSTHENAGBI1 
AamBı1a PFRINT"DATAFEHLERTSPACEIINISPACEIZEILEISPAL 
E}r ";ABOB13+Z: END 
AaDB1l IFA<BTHENA4BBLS 
ABOLZ S=BıA=-D:NEXT 
4am13 SYS 498704 «RETURN 
4B214 DATA 29,20,02,02,98,89,0A,65,88,00,00,00,8 
2,229,3590,09,00,22,B2,0D, 218 
4aB15 DATA 09,FB,920,02,20,08,098,32,8E,14,.A2,0E,2 
8,60,18,194,57,11,2B,ED, 1194 
49016 DATA 15,14,89,13,14,42,DE,28,67,11,28,45,1 
D,14,45,10,28,45,1D,14, 967 
40017 DATA 14,1A,1E,EB,15,8A,87,15,14,ED,15,64,4 
5,1D,14,45,10D,28,45,1D, 1232 
40B1E DATA 14,14,1A,1E,ED,15,09,87,13,1D,89,13,8 
1,92,BE,14,.A2,BE,DA,A2, 1238 
48819 DATA BE,14,67,11,28,A2,0E,14,42,BE,28,ED,1 
5,14,ED,15,14,89,15,1E, 1338 
ARaza DATA 67,11,09,92,BE,54,08,F7,84,58,8A,0D,3 
C,A2,BE,30C,67,11,3C,ED, 1477 
aug21 DATA 15,3C,CF,22,50,6D,19,78,F7,BA,3C,BA,B 
09,36,A2,BE,3C0C,47,11,30, 1943 
498022 DATA F7,2R,3C,65D,18,3C,F7,94,78,0B,98,B5,8 
8,598,F8,@A,30,47,8C,3C, 16417 
40823 DATA A3,0E,3C0,0D9,22,3C0,EE,15,30,65,909,78,B 
5,09,50,FB,QOA,3C,Af ,BE, 1842 
48924 DATA 3C,A3,8E,30,F8,BA,30,4E,19,3C,F8,80A,3 
2,F8,0A,BA,4E,10,BA,69, 1517 
489225 DATA 11,@A,5E,18,BA,F0,0A,29,008,00,09,01,8 
D,15,7E,80,10,9E,8D,11, 1394 
AuR2& DATA FE,AF,FD,BD,12,E,80,13,7E,80,14,9E,A 
2,10,BD,1B,7E,9D,88,04, 2455 
49827 DATA CA, 18,F7,79,07,438,00,14,B3,A9,9F,ODyi 
5,03,59,648,50,50,A2,18, 2245 
AHABZE DATA AI,DE,7D,00,D4,C9,18,F9,79,99,31 ‚80, 1 
4,03,49,EA,80,15,83,58, 2184 
423829 DATA 68,68,A7,8F,00,18 «D4,ER,CE; 15,9E ,DO,4 
8,EE,12,9E,EE,12,9E ,EE, zrı8 
A8038 DATA 12,9E,AD,12,7E,09,65,790,20,69,497,48,8 
D,84,D4,BD,35,7E,BD,009, 2398 
44831 DATA D4,BD,36, 9E,8D,81 ,D4,BD,37 ,9E,9D, 15,7 
E,67,41,8D0,84,D04,18,90, 2448 
40032 DATA 18,A9,F0,8D,12,9E,BD,13,9E,.8D,14,9E,A 
9,01,80,15,7E,2D,18,9E, 2285 
48833 DATA BD,11,9E,09,5%,CE,198,9E,08,28,A9,28,8 
D,BR,D4,EE,15,9E,EE,13, 2477 
42234 DATA 9E,EE,13,9E ,AE,13,9E,BD,977,9E,80,27,D 
4,BD,7A,9E,8D,29,D4)BD, 2835 
48935 DATA 9B,9E,0D,10,7E,A9,21,8D,0B,D4,CE,11,7 
€,09,28,39,18,BD,12,D4, 237% 
40935 DATA EE,14,9E,EE,14,9E,EE,14, JE, AE,14,9E,B 
0,05,7E,BD,BE,D4,BD,Cö, 2878 i 
48837 DATA 9E,BD,4F,D4,80,C7,9E,8D,11,9E,99,11,8 
D,12,D4,49C0,51 ,ER,28,7F, 2431 
KDOBD REM LURSOR MC-ROUTINE INIT 
sB005 FORI=ATOF 
HSAB1IB HL4B+D)=IsHLAFHTI=I1 Hr LOS NEXT 
68028 FORI= 49152 TO 49253 »READAS 
EBB3B H=ASCILEFTF(AF,LII 
HARD L=ASCIRIGHTFIAS, LI) 
sERS5a D=HiH) #16+H IL): 5=S+Dı POKEI ,D 
A=Atl: IFASZBTHENNEXT: A=—i 
“aa7a READY: Z=Z+13 IFV-STHENSBBES 
KANBB PRINT"DATAFEHLERCSPACEIIN{SPACEIZEILEISPAG. 
EI E"3682009+2r END 
085 IFA<BTHENSBIGB 
EB0IFE 5=-D:A=Bı NEXT 
&BLBB RETURN \ 
60281 DATA 28,FD,6E,28,9E,B7,049,00,85,F7,49,08,8 
5,FA,18,A5,F9,67,58,85, 2707 
48282 DATA FI,A5,FA,69,098,05,FA,CA,D8,F@,20,FD,A 
E,28,9E,B7,18,A5,F9,69, 3177 
69283 DATA 32,85,F9,A5,FA,69,09,85,FA,CA,D@,F9,3 
B,45,F9,E9,29,85,79,95, 3228 
49284 DATA FA,EF,88,85,FA,20,FD,AE,28,9€E,B7,B6,F 
B,A2,05,AB,04,B1,F9,29, 2881 
sazeS DATA OF ,E9,98,F2,04,05,FB,71,F9,89,10,F1,1 
8,A5,F9,69,28,854F7,n5, 2799 
60205 DATA FA,67,00,85,FA,CA,D@,DF,68,CE,00,29, 
1722 

FNRF PFR TSTINER 





GSompube miß 


<212> 
<99> 
<109> 
<116> 
<i91> 
<S8> 
<12&> 
<207> 
<58> 
<137> 
<127> 
<230> 
<247> 
<149> 
<136> 
36> 
<166> 
<167> 
<i1d> 
<169> 
<214> 
x53> 
<188> 
<175> 
<121> 
<239> 
<B5> 
<54> 
<23> 
<24> 
+3> 
<«113> 
«111» 
<1BB> 
<69> 


<194> 
<145> 


<107> . 


<234> 
<253> 
<135> 
<97> 
<177> 
<x39> 
<ı1&> 
<2467 
<> 
4237> 
%23> 
<129> 
<221> 
<247> 


«32 


31 





























Heft 1/86 

Commodare 

Bestell-Nr. COM CK 1/2 18,- DM 
Bestell-Nr. COM CD 1/2 20,— DM 


Checksummer 1.0 C, Astronaut Battie 
(C-64), Nueycobra (C-16/716), Hard- 
copyroutine (C-16/116), Helmut und 
die Zeitmaschine (C-16/116), Loves 
NEED Rock'ma (VC-20), Charly der 

ketenmann {VC-20), Interrupt-Pro- 
grammierung (VC-20) 


Schneider 

Bestell-Nr. COM SK 1/2 16,- DM 
Bestell-Nr. COM SD 1/2 29,— DM 
Detender, Boulder Dash, Basic-Be- 





fehle auf den Funktionstasten 

Heft 5/86 

Commodore 

Bestell-Nr. COM CK 5/2 18,- DM 
Bestell-Nr. COM CD 5/2 20,- DM 
Space-Devil (C-64), Disk-Eddi (C-64), 
ABC-Legen (VC-20), 3-D-Labyrinth 


(VC-20), Tron (VC-20), Invadors of 
Space (C-16/116), Submarine (C-16/ 
116), Balkendiegramm (C-16/116) 


Schneider 

Bestell-Nr. COM SK 5/2 16, — 
Bestell-Nr. COMSD5/2 23,- DM 
Startank, Grafik-Designer, Cross-Re- 
terence, itext 


Heft 9/86 

Commodore 

Bestell-Nr. COM CK 9/2 186,- 
Bestell-Nr. COM CD 9/2 20,- DM 


Moonpatrol (VC20), Falcorıs Lander 
(VC20), Frogger (VC 20), The Games 
(C64), Cave of Death (C64) Sprites 
and Sound mit dem UMH-System 
(C 84), Diggy (C 16/116), Tapedirecto- 
ry (C 16/116), Reversi (C 16/118) 


16,— 


DM 
Bestell-Nr. COM SD 9/2 23,- DM 


Creepy, Briefeschreiben, Frutty Man,. 
Mirror Battle : E 
Heft 1/87 

Commodore 

Bestell-Nr. COMCK 173 16,- DM 
Bestell-Nr. COM CD 1/3 —- DM 


Torch (VC20), Bomberman (VC 20), 
Note Screen (C 16/116), Champ (C 16/ 
116), Checksummer (C 16/116), Check- 
summer (C64), Pyramid (C 16/116), 
Turbo-Disc (C 64), IRQ-Routine (C 64), 
Aylan (C64), ice Racing (C 64) 


Schneider 

Bestell-Nr. COM SK 1/3 96,- 
Bestell-Nr. COM SD 1/3 23,- DM 
Electric Gladiators, Bildschirmtool- 
box, Suprabäsic,.. Spritegenerator, 
Madgoon’s Race, Star Trek, Check- 
summer 


Aus diesem Heft: 


Heit 2/86 

Gommadore 

Bestell-Nr. COM CK 272 16,- DM 
Bestell-Nr. COMCD 22 20,— DM 


Robo (C-64}, Basic-Befehlserwelte- 
rung (C-64), Haketenstart (C-16/116), 
Dreikampf (C-16/116), Headline (C-16/ 
116), Defender (VC-20), Formel 1 (VC- 
20), Memory-Display {VC-20} 


Schneider 

Bestell-Nr. COM SK 2/2 16, — 
Bestell-Nr. COM SD 22 23,- DM 
Allen 2001, Diamond Hunter, Direc- 
tory 


Heft 6/86 

Commodore 

Bestell-Nr. COM CK 62 16,—- DM 
Bestell-Nr. COMCD&62 20,— DM 


Music-Master (C-64), The little Puck 
goes home (C-64), EDDY (C-64), In- 
verg-Utility (C-16/116), Checksummer 
(©-16/116), Attenwurf (C-16/118), Da- 
ta-Maker (VC-20), Karate-Kid (VC-20), 
G-Bert (VC-20) 


Schneider 

Bestell-Nr. COM SK 6/2 18,— DM 
Bestell-Nr. COMSDW2  23,- DM 
Disksort, Mini-Forth, Stereommand 


Heft 10/86 

Commodore 

Bestell-Nr. COM CK 10/2  16,—- DM 
Bestell-Nr. COM CD 10/72 20,- DM 


Laufschrift {VO20), Checksummer 
(VC20), Treasure Robber {VC20), 
Een | Bi 

4 a {022 
a Norte) Fil-Utllity (0-16), Railway 
(C-16), Domino (C-16), Sprite Turn 
Character-Switch (0-64), Checksum- 
mer (C-64), Horse Gamas (C-64); Pa- 
trouille (C-64) 


Schneider 

Bestell-Nr. COM SK 12 16,— DM 
Bestell-Nr. COM SD 10/72 23,- DM 
Checksummer, Panio-Car, Scurfy 
Joe, Drawgenerator, Alrfighter 


Heft 2/67 


Commodore 

Bestell-Nr. COMCK 23 16,- DM 
Bestell-Nr. COM CD23 20,— DM 
Quest for Tires (VC 20), Cave Fighters 
{VC20), Mc Stoney in the Caves 
(C16/116), Cube (C16/116), Hostage 
(C 16/116), Adress 16 (plus 4), Easy Ba- 
sic en Ski-Jumping (C64), Job- 
Race (C 64) 


Schneider 

Bestell-Nr. COM SK 23 16,— DM 
Bestell-Nr. COM SD 2/3 23,- DM 
The Hero, Smash It, 16 RSX Befehle, 
Disc Star 2.1 


Commodore 
Diskette 


Bestell-Nr. COM SD 11/2 


Kassette COM CK 5/3 
COM CD 5/3 


Heft 86 


Commodore 
Bestell-Nr. COM CK 3/2 16,— DM 
Bestell-Nr. COMCD 42 20,— DM 
ke (C-16/116), Here (C-16/ 
116), Data-Maker (C-16/116), Befehls- 
erwelterung (C-64), Starchip (C-64), 
Mini-Car-Rece {C-54), Text-Scrolter 
an Text-Editor (C-64), Checksum- 
mer (VC-20), Robin at Ravenwreck 
(VC-20), Mini-Karate {VC-20), Auto- 


number-Routine (VC-20) 

Schneider 

BesteilNr. COM SK32 16,- DM 
Bestell-Nr. COMSDI3R2 4 23,- = 








Heft 7/86 

Commodore 

Bestell-Nr. COMCK 7/72 16,— DM 
eg COMCO72 20,- DM 


C-20-Sound-Derme, Mad Rush (VC- 
2 Ghost-Helt (vC-20), Rosdrunner 
(6-84), Basic Extension (C-64), Meteo- 


nitenstumm {0-64}, Checksummer 
{C-16/116}, Airwalf (C-16/116), Break- 

Qut (C-t5/116) 

Schneider 

Bestell-Nr. COM SK 772 18,- DM 
Bestell-Nr. COM SD 7/2 23,- DM 


Poker, Cave-Walker, Diskettenarchiv 


Heft 11/86 


Commodore 
Bestell-Nr. COM CK 11/2 18,— DM 
Bestell-Nr. COM CD 11/2 20,- Ka 


Cooky (VC 20), Gambol {VG 20), Wo- 
stok (VC20}, Topball (C 16), Zauber- 

puzzle wand: Deberouine (C 16), 
Atlantis (C64), Astronomie (C64), 
Deutsche Fehlermeldung (C 64), Rem- 
zeilenkiller (C 64) 


Schmelder 

Bestelt-Nr. COM 5K 112 16,- 
23;— DM 
Diskettenhilfe, Hortgr Driver, Disc af 
Tron, Space Hawk, Morsedlecoder 


Heft 3/87 (Heftnummer mit angeben!) 


Commodore 

Bestell-Nr. COM CK 33 387 16,- 
Bestell-Nr. COM CD 3/3 387 20,— 
Action Ball (VC20), Star Attack 
an Der neue Checksummer 
(C16/116), Bobdriving {GC 16/116), 
Find-Utlity (C16/116), Mac Coin 
(C16/116), SWAP-Utility (C16/116}, 
Druckerroutine (C16/116/plus4), Ap- 
pleman {C16/116 m, 64K), Trampolin 
Games (C64), Checksummer (C64), 
Mission Code (C64), Sprite Tool (64) 


Schneider 

Bestell-Nr. COM SK 373 387 16,— 
Bestell-Nr. COM SD 33 3/87 23, - 
Boing Boing, Colors, Druckerprato- 
koll, Checksummer, Aurion 2 


Schneider 
Kassette 
Diskette COM SD 53 


16,— 
- DM 


GCompute mib 





Shuttle (VC-20), Josef In den Höhlen 
(VC-20), Merge-Routine (VC-20}, Shoot 
it (VC.20), Fast Trust (C-64}, Data-Text 
84 (C-64}, Gary, der schnelle Kahel- 
verleger (C-16/116), SDI (C-16/116), 
Deep-Routine (C-16/116) 


‘Schneider 


Besten-Nr. COM SK 4/2 16,— 
Bestell-Nr. COM SD 4/2 23,- 
Space-Rescue, Text-Editor, Starfight, 
Programm-Retter 


Heft 8/86 


Commodore 

Bestell-Nr. COM CK 8/2 16,- 
Bestell-Nr. COM CD 8/2 20,- 
Death Desert (C-64), 3-D-Labyrinth 
wiN, er (C-84), Bahnhof {VC-20), 


WC- 
Platinenlayout (C-16/116), Bal- 
Be mon. (Caoinıe), Bat 








Schneider 
Bastell-Nr. COM SK 8/2 16,” DM 
Bestelliir. COM SD 8/2 23,- D 
Heft 12/86 
Commodore 
Bestell-Nr. COM CK 1272 16,— DM 
Bestell-Nr. COM CD 132 20,- DM 


Ballorı Hopper (VC20), Fight Ni 
(VC 20), King af Kings (C 16/716}, 
laxis (C 18/116), Sprites (C16/116), 
Atom (064), ern (684), 
IRO-Directory (C64) 


Schneider 
Bestell-Nr, COM SK 12/2 16,—- DM 
Bestell-Nr. COM SD 12/2 23,— 
Allen Attack, Lucky Luck, 

mer, Tracer 
Heft 4/87 
Commodore 
Bestell-Nr. COM CK 4/3 16,— DM 
Bestell-Nr. COM CD 4/3 20,- DM 


Math (VC20), J r (VC 20), Monitor 
{VC 20), Eitmaterschießen (C (C18/116/ 
plus4), Super-Q-Bert. (C16/116/phıs 
4), Froggy (C16/116/plus4), Memory 
Dump (C16/116/plus4), Aam-Dise- 
Monitor {C 64), Startrip (C 64), Immi- 
er {C 64), Run Version Generator 
f.| 


Schneider 

Bestell-Nr. COM SK 4/3 18,- DM 
BestelHlr. COM SD 4/3 23,—- DM 
Find {464), Tape Backup System (464), 
Die schwarzen Diamanten (464, 664, 
6128), 3-D-Pac Man (464, 864, 6128) 


COM SK 5/3 16,- DM 
23,— DM 





5/87 





Absender 
{Bitte deutlich schreiben) 





Yorname/Name 





Homecamputer-System 





Straße/Nr. 





PLZ Ort 





Telefon Vorwahl/Rofnummer 


Absender 


(Bitte deutlich schreiben} 





Yornarıe/ Narıc 





Homecomputer-System 





Straße/Nr. 





PLZ Or 





Telefon Vorwahl/ Rufnummer 


T 


Absender 


(Bitte deutlich schreiben) 





Vorname’ Name 





Homecomputer-System 





Straße/Nr, 





PLZ On 





Telefon Yorwahl/Rulnummer 







Birte mit der 
jeweils gültigen 


HosiarReR, ühr 
Ircımachen 
Antwortkarte 

Tronic-Verlag GmbH 
ABO-Service 


Postfach 870 


D-3440 Eschwege 





Birte mit der 
jeweils gültigen 
Postkartengebühr 
freimachen 


Antwortkarte 





Tronic-Verlag GmbH 
»Compute mit« 
Postfach 870 


D-3440 Eschwege 






Bitte mit der 
jeweils gültigen 
Posckarwengebühr 
freimachen 
Antwortkarte 


Tronic-Verlag GmbH 
Software-Service 
Postfach 870 


D-3440 Eschwege 


ı;.. Schneider 


G2C 


ket i 










tatch, Interceptor 3D, City 
‘a Castle, Copter Patroal, CPC 
mon Attack, Duell, Eis, Labyrint, 
3nider's,Maze, Geister Schloß, 
ger, Secret Valley, Aladin, 
‚, Cave runner, Cobra, Erwin, 


Kassette 20, 
Diskette 27, - 








ket 2 
er 


pen, Datenverwaltung, Discopy, 
r, Remkiller, SU-Fite, 
ng 




















Kassette 20, — 
Diskette 27, — 





Preis 
Kası.!Disk. 


12, -18,- 


12, -118,- 
12,- 118, 
ron 12,-18,- 
15, +120,- 


wit) 1B,-/20,— 


vare service 


pnic-Verlag bietet 
software für jeder- 


ıgen Sie sich von 
ı Angeboten und 
n Sie noch heute. 
stellungen werden 
Ib nur 

Woche* 
ıgang bearbeitet. 
sche Bestellungen 
r Rufnummer 


351/300 11 











Heft 1/86 





Commodore 
Bestell-Nr. COMCK 1/2 186,— DM 
Bestell-Nr. COMCD Y2 20,—- DM 
Checksummer 1.0C, Astronaut Battle 
(C-54), Nueycobra (C-16/116), Hard- 
copyroutine (C-16/116), Helmut und 
die Zeitmaschine (C-16/116), Loces 
Rock'me (VC-20), Charly der 
ketenmann (VC-20), Interrupt-Pro- 
grammierung (VG-20) 


Schneider 

Bestell-Nr. COM SK 1/2 16,- DB 
Bestell-Nr. COMSD 1/2 23,- 
Defender, Boulder Dash, Basio-Be- 
‚fehle auf den Funktionstasten 





| Beste. comsKsı2 16,- DM 


Bestell-Nr. COMSD 5/2 23,- DM 
 ‚Startank, EN DRRNINEN, Cross-Re- 
‚feren ference, Ite 





Moonpatrol Von rd m 
(vC20), Frogger Er e Games 
ER a of (C64) Sprites 
co9, MR lortie), 
ry (C 16/116), Reversi «eng 


Schneider 

Bestell-Nr. COM SK 9/2 16,- DM 

Bestell-Nr. COM SD9/2 23,— DM 

ra Briefeschreiben, Frutty Mar, 
Mirror Battle 

Fon 1187 


{VC 20), Bomberman (VC 
Note Screen 616/116), Champ (C1 
116), Checksummer (C 16/116), Check- 
summer (C64), Pyramid (618/116), 
Turbo-Disc (C 64), IRQ-Routine (C 64), 
Aylan (C64), Ice Racing (C64) 


Schneider 

Bestell-Nr. COM SK 1/3 16,— DM 
Bestell-Nr. COMSD 1/4 29,— DM 
Electric Gladiators, Bildschirmtool- 
box, Suprabasic, Spritegenerator, 
Madgoon's Race, Star Trek, Check- 
summer 


VCH ll-Et-J Wall 


Kombi-Abo »Compute mit« Akenkarte 


Name/ Vorname 


Straße/Nr. 


zum Preis von 














PLZ/Ort 


Ich wünsche folgendes ABO: 
[] 12 Exemplare »Compute mit...«+ 12 bespielte Kassetten 


129,50 DM (Ausland 142,50 DM) 




















i Ü Commodore D Schneider 
" [] 12 Exemplare »Compute mit... + 12 bespielte Disketten 
| zum Preis von 209,50 DM ER 286,50 DM (Schneider) 
n [| Commodore m Schneider 
l [U] 12 Exemplare »Compute mit... ohne bespielte Kassetten 
P zum Preis von 42,- DM (Ausland 52,- DM) 
gegen 
Ü[] Rechnung [] Vorkasse 
Datum, Unterschrift 
[[] Bargeldlos durch Bankeinzug: 
Bankleitzahl 
Geldinstirur ” Konto-Nr. 
x Abonnement-Küncigungen: 
ft & Wochen vor Ablauf des Jahresabonnements. Außerdem kann ich diese Bestellung innerhalb von 19 Tagen beim Verlag widerrufen! 
k Zur Wahrung Jder Frist jenügı die rechtzeitige Absendung des Widerrufes, 
i (Bei Minderjährigen ist die Unterschrift eines Erziehungsberechtigzen erforderlich.) 
1 
’ Abo-Beginn ab Heft: Datum, Unrerscheift 


Auftrag für Gelegenheitsanzeigen in »Compute mit...« 


g An 

{ »Compute mit...« 
: Tronic-Verlag 
Postfach 
3440 Eschwege 


ä 
E 
;: 
N Unter der Rubrik »Kleinanzeigen« 
„ veröffentlichen wir Gelegenheits- 
Li anzeigen für Verkaufsangebole, 
€ Kauf- und Tauschgesuche, Kon- 
E laktaufnahme bzw. Erlahrungs- 
austausch usw. 
E Unser Preis für »Kleinanzelgene: 
r Private Kleinanzeigen 
a bis 5 Zeilen nur 5,- DM 
bis 10 Zeilen nur 10,- DM 
Jede gewerbliche Gelegenheits- 
: anzeige 
bis 10 Zeilen nur 15,- DM 
n {dürfen nicht unter Chiffre er- 
ti scheinen) 
| Eine Yeröffentiichung erfolgt nur 
gegen Vorkasse! 


Kleinanzeigen jetzt 
noch preiswerter 


Bestellkarte 


28 F2aA2Hm9 I7I- nmMmia. 





[_] Kassette für 


949u%0 


Ü Diskette für 


Name, Vorname 





PLZ, Ort 
{Bei Minderjährigen ist die Unterschrift eines Erziehungsberechtigten erforderlich.) 


Die Zustellung erfolgt; gegen Vorkasse [] oder per Nachnahme |] RN 


Ausland: nur gegen Vorkasse (Bargeld oder Scheck) 


innerhalb von 1 Woche 
Entnehmen Sie bitte aus unserer Preisliste die notwendigen Angaben für Ihre Bestellung: 


Bitte liefern Sie mir: 


| zum Preis von gesamt - DM 


Name und Adresse 














Unterschrift Datum 


Ich wünsche folgenden Text zu veröffentlichen: 











I RR DD DR RD Ks KB | 

11 4 BR A a RT a Ds Ra AR a | 

BESELRSLERIEE SEEN SZERZSLH DALE. 
Zutreifendes ankreuzen 


O Biete Hardware O0 biete Software O suche DO Kontakte O Versch. 


Software-Service 












+ Versandkosten 














[I] Anzahl 








Bestell-Nr. 





[] Anzahl 





Bestell-Nr. 








Straße, Nr.: 





Datum, Uncerschrift 





Absender 


(Bitte deutlich schreiben) 





Vurname/Name 





Homecomputer-System 





Straße/Nr. 





PLZ Ort 





Telefon Vorwahl/Rufnummer 


Absender 
{Bitte deutlich schreiben) 





Vorname Nanıe 





Homecompurer-System 





Straße/Nr. 





PLZ Ort 





Telefon Vorwahl/Rufnummer 


u 


Absender 
{Bitte deutlich schreiben) 





Vorname’ Name 





Homecom purer-System 





Straße/Nr. 








PLZ Ort 





Telefon Vorwahl/Rufnummer 






Bitce mit der 





„Rise mir 
Beckanetpelühr 
freimachen 
Antwortkarte 
Tronic-Verlag GmbH 
ABO-Service 


Postfach 870 


D-3440 Eschwege 


Birte mit der 
jeweils gültigen 
Posrkartengebühr 


Antwortkarte freimachen 
Tronic-Verlag GmbH 
»Compute mit« 
Postfach 870 
D-3440 Eschwege 
eh 
Poskaengebühr 
Antwortkarte reimachen 
Tronic-Verlag GmbH 
Software-Service 


Postfach 870 


D-3440 Eschwege 


1. Schneider 


=" CBC 


ket 1 | 









‚atch, Interceptor 3D, City 
's Castle, Copter Patrool, CPC 
mon Attack, Duell, Etis, Labyrint, 
snider's.Maze, Geister Schloß, 
ger, Secret Valley, Aladin, 
}, Cave runner, Cobra, Erwin, 


Kassette 20, - 
Diskette 27, - 








ket 2 
er 


pen, Datenverwaltung, Discopy, 
r, Remkiller, SU-File, 
ng 









Kassette 20, — 
Diskette 27, — 











Prois 

Kass. Disk. 
12,-18,- 

vavos 12,-718,- 
12,-118,- 

[} 12,-118,- 
12,18, + 


ron 12,- 48,= 
15,-120,- 


ya  18,-120,- 


are service E 


dnic-Verlag bietet 
software für jeder- 






igen Sie sich von 
ı Angeboten und 
n Sie noch heute. 
stellungen werden 
Ib nur 


Woche* 
ıgang bearbeitet. 
sche Bestellungen 
r Rufnummer 


351/300 11 









u 












ee wvo2 


summer (C64), 








‚Bestell-Nr. COMCK 1/2 16,— DI 
Bestell-Nr. COM CD 12 20,- DA 
Checksummer 1.0C, ‚Astronaut Bath 
(0-54), Nueycobwa (C-16/118), Hard 
copyroutine C-16/116), Helm un 

Zeitmaschine (C-16/116}, Loce 

-20), Rock'me (VC-20), Charly de 
laketenmann end Interrupt-Prd 


«| 


‚Schneider 
sei COMSK 12 18,- DA 


Bestell-Nr. COM SD 1/2 23,- Di 
‘Defender, Boulder Dash, 
‚fehle auf den Funktionstasten 


ic-Be 





‚(VC-20), Tron (VC-20), Invadora 
‚Spac Arad ), Submarine (C-16 
116), Balkendiagramm (C-16/116) 


Besteht. COM SK 5/2 = Dn 
Be, COM SD 5/2 - DA 
'Startank, Kar Designer, Cross 





email Com cK92 1%- 

r. , 

r. COMCD92 20,- DM 
. on ei a 

En Ai, ER Desth KM Spriteı 


m UMH: 
84), Digay (©18/118), Tapedii 
eig, Same krahıs) 


Besteikär. SUR 92 





Bester t 
Note: Seren (1a) Champ. 
n D Liu 
116), Checksummer (C 16/ Aa 
N Yin 


Turbo Dies (C 64), IRQ-Routine (C 64 
Rylan (C64), !ce Racing (C 64) 


Schneider 

Bestell-Nr. COMSK 113 16,- Di 
‚Bestell-Nr. COM SD 1/3 23, — = 
Electric Gladiators, Bildschirmtoo! 
box, Suprabasic, Spritegeneratot 
Madgoon's Race, Star Trek, Check 
summer | 





Kombi-Abo »Compute mit« 


Abrufkarte 





Name/ Vorname 








Straße/Nr. 


PLZ/Ort 


Ich wünsche folgendes ABO: 


[1 12 Exemplare »Compure mit...«+ 12 bespielte Kassetten 


zum Preis von 


Ü Commodore 


129,50 DM (Ausland 142,50 DM} 
Bl Schneider 


[] 12 Exemplare »Compute mit...«+ 12 bespielre Disketten 


zum Preis von 209,50 DM (Commodore) 
[ ] Commodore 


286,50 DM (Schneider) 


Schneider 


[] 12 Exemplare »Compute mit...« ohne bespielte Kassetten 


zum Preis von 


42,— DM (Ausland 52,- DM) 














gegen 
[] Rechnung [[] Vorkasse 
n Datum, Unterschrift 
[_] Bargeldlos durch Bankeinzug; 
Bankleitzahl 
Geldinstitur Konten, 


Abonnement-Küngigungen: 


ı 6 Wochen vor Ablaul des Jahresabonnements. Außerdem kann ich diese Bestellung innerhalb von IC Tagen beim Verlag widerrufen! 
Zur Wahrung der Frist gerügr die rechtzeitige Absendung des Widerrufes. 


(Bei Minder’ährigen ist te Unterschritt eines Erziehungsb:- 


Abo-Beginn ab Heft: .___ 


“rchrigten erforderlich.) 





um: Ünserschrift a 








Auftrag für Gelegenheitsanzeigen in »Compute mit...« 


An 

»Compute mit...« 
Tronic-Verlag 
Postfach 

3440 Eschwege 


Unter der Rubrik »Kleinanzeigen« 
veröffentlichen wir Gelegenheits- 
anzeigen für Verkaufsangsbats, 
Kauf- und Tauschgesuche, Kon- 
taklaufnahme bzw. Ertahrungs- 
auslausch usw. 

Unser Preis für »Kleinanzeigen«: 
Private Kleinanzeigen 

bis 5 Zeilen aur 5,- DM 
bis 10 Zeilen nur 10,- DM 


Jede gewerbliche Gelegenheits- 


anzeige 

bis 10 Zeilen nur 15,- DM 
{dürfen nicht unter Chiffre er- 
scheinen} 

Eine Veröffentlichung erlalgt nur 


gegen Vorkasse! 
Kleinanzeigen jetzt 
noch preiswerter 


Bestellkarte 


Name und Adresse 











Unterschrifl 


Ich wünsche folgenden Text zu veröffentlichen: 

















5,- 
EI EIS ET IT TEIL FELL EL TI RS 
a Da a KPD I N 0 DV DR 
RI A kb bel bh hs ka hd eh Beohsleu lesben 
EIN SEETÄA RRFHERIN BERN RED 
SESESESHBIZSHIERNEESBSRENSEEMEEER.., 
Zutreffendes ankreuzen 
O Biete Hardware O biete Software O suche © Kontakte O Varsch. 
Software-Service 





Die Zustellung erfolgt: 


Ausland: nur gegen Vorkasse (Bargeld oder Scheck} 
innerhalb von 1 Woche 
Entnehmen Sie bitte aus unserer Preisliste die notwendigen Angaben für Ihre Bestellung: 


Bitte liefern Sie mur: 


[_} Kassette für 


© U] Diskette für 


zum Preis von gesamt 


oder per Nachnahme [_] 


gegen Vorkasse [_] 
+ Versandkosten 








= U] Anzahl 
Bestell-Nr. 
Ä 
Bestell-Nr. I] nzahl 
DM 








Name, Vorname 


Swaße, Nr.: 








PLZ, Ör 


{Bei Minderjährigen ist die Unterschrift eines Erziehungsberechtigten erforderlich.} 





Dstom, Unterschrift 





Neu: Superpakete zum Superpreis! 


Superpaket 1 


Spiele 


Monster Attack, Projekt, High Noon, Brieftaubs, 
Cadilon, Turbo Jet, Sea Attack, The Maze 
Graze Game, Galaxi, Space Comets, Sheet, 


Vampir, Memery 


SP-C-K-3 
SP-C-D-1 


Superpaket 2 


Spiele 


Kassette 20, - 
Diskette 20,— 


Tank Duell, Astronaut, Jungle 1, Jungle 2, Sufo, 
Fire-Legion, Spiders, Star Battle, Super 
Breakout, Mission Rescue, Roadpainter, 


Moonswesper, Scatti 


SP-C-K-2 
SP-C-D-2 


Superpaket 3 
Anwender 


Kassette 20, - 
Diskeite 20, — 


The Basic, Basicreset, Data-Generator, Print- 

4 Generator, Supermon-84, Restore N, Disky 10, 
Fill-Loader, Funktionstasten-Belegung, Autostarl, 
Multibasic, Bildeditor, Spritehilfe + Demo, 
Autonumber, Micro-Taols + Mioader 


f 
SP-C-K-3 
SP-C-D-3 


toinschlag 
Stono Age comic 
Doadiy Mission 
Taxi Drivarl 
Spaco Odyssany 
Jooll,ook Sharp 


Kassette 20, — 
Diskette 20, — 


Preis 
Kass.iDisk, 


18,= 118, = 
1, - 1, - 
1-15,“ 
19,115, > 


45,119,» 
19,-115,- 


19,5019,80 
19,50119,50 


‚Superpaket 1 


Horror Castle, Fantasy County, Sarıso, Jumping 
Joe, Schatztaucher, Shaolin, City Runnar 


SP-O-K-1 Kassette 20, 
SP-0-D-t Diskette 20, - 


Superpaket 2 
Genesis-Super-Assembler 
für C-16/116&plus4 


Komplett mit Anleitung 


SP-0-K-2 
SP-O-D-2 


Preis Baste-Hr. 
Kasn./Disk. 


19,- 110, = 03 
10,-110,- 043 


14,116, 03. 


Matoorstorm 14-14, - 
Fiower!Hyperspace 18, - 118,» 
1 


Save aur Turtles 


Superpaket 1 

Flowers, Tanker, Jupiter Flescue, Einbrecher, 
Hospital, Alien, Flipperball, Sub-Zone, Dr. Corp, 
Geo-Zayxan, Froggies Night Mare, Punkte- 
tresser, Starwars, Salavage Crew 


SP-V-1 nur Kassette 20,- 


Castle Dracula 
UFO.Destroyer 
Cave Alderi 
Cosmic Bosuncer 
Biathlon! 

Space Laboratory 


Anleitungen zu unseren Programmen erhalten Sie aus un- 
seren Heften. Bei ausverkauften Heften erhalten Sie zum 
Heftpreis Fotokopien der Spielbeschreibungen. 

Hefte ohne Software nur gegen Vorkasse! 
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Gompube mib 


Superpaket 1 
Spiele 


‚Alterı Hunter, Catch, Interceptar ID, City 
Lander, Conan's Castle, Copter Patroo), CPC 
Berl, Grash, Demon Attack, Duell, Etis, Labyrint, 
Miner, Tower, Snider's. Maze, Geister Schloß, 
Falischirmspringer, Secret Valtay, Aladin, 
Hounted Castle, Cave runner, Cobra, Erwin, 
Kruemi, Q-Bert 


SP-SR-K-1 Kassette 20, — 
SP-SR-D-1 Diskette 27, — 


Superpaket 2 
Anwender 


Back up, Data gen, Datenverwaltung, Discopy, 
Monitor, Painter, Aemkillar, SU-File, 
Tastaturbelegung 


SP-SR-K-2 Kassette 20, — 
SP-SR-D-2 Diskette 27,- 


Programm Prois Boestall-Hr. 
K. 


Schneider Panikj 

1 SR 13 
Bildnight/Horror Caves = OR 23 
Spider Mazo 12, ER 33 
Triton/Traumland 12,-/18,+ 3843 
Heoäcopter Pilot 12,-118,- 
Ned Alarti . 
Spesdy-FrogslAulon 12,- 119, 
Space Battla 18,-/20,- 
PacMan! 
Procen DettefHoapital 19, -/20,- 


software service 


Der Tronic-Verlag bietet 
Spitzensoftware für jeder- 
mann. Ä 
Überzeugen $ie sich von 
unseren Angeboten und 
bestellen Sie noch heute. 
Alle Bestellungen werden 
innerhalb nur 


1 Woche* 


nach Eingang bearbeitet. 
Telefonische Bestellungen 
unter der Rufnummer 


05651/30011 


* ohne Postwagt 





33 









































Srosramme 


c® FCMON 


_ Unser Super Monitor 


für Floppy und Computer 





Nachdem wir letztes Mal im er- 
sten Teil die Grundversion veröf- 
fentlicht haben, präsentieren wir 
diesmal die versprochene Erwei- 
terung. $o wird das Programm 
endlich seinem Namen “MONE 
TOR“ gerecht, denn diese Teil 
enthält die Standardfunktionen 
eines solchen Maschinensprache- 
tools. 

Bevor es jedoch soweit ist, daß Sie 
die neuen Befehle ausprobieren 
können, wartet noch eine Menge 
Arbeit auf Sie. Zunächst müssen 
Sie das Basic-Data-Listing abtip- 
pen. Vergessen $ie bitte nicht, das’ 
Basicprogramm abzuspeichern, 
Sie könnten es noch zu eventuel- 
len Fehlerkorrekturen gebrau- 
chen. Ist das Programm fehlerfrei, 
so starten Sie es. 

Nun laden Sie den ersten Teil (aus 
Heft 4} absolut (..,8,1 NEW) hin- 
zu. Dieser wird im Speicher auto- 
matisch vor die Erweiterung ge- 
setzt. Die neuen Befehle müssen 
jetzt nur noch in das Ursprung- 
sprogramm eingebunden werden. 
Hierzu gibt man folgende Pokes 


ein: 

POKE 28830,176:  POKE 

28831,122; 

PORE 28832,26: POKE 
:709G FA 72 BO i 
:704 71 7B 00 


:70AG 00 70 97 
»70B4 00 70 00 


:70BC EE 73 00 
:70C4 00 70 00 


Um den Monitor zu komplettie- 
ren, muß noch ein Vector geän- 
dert werden. Dazu müssen Sie 
den Bereich den Bereich 

$7016 - $701D disassemblieren. 
Das erste LDA ändern Sie in 


»288323,123 


Anschließend starten Sie 
FCMON mit SYS 28672. Es 
steht nun ein zusätzlicher Befehl 
zur Verfügung: 

M - Memory Dump 


Die weiteren Befehle können wir 
mit FCMON selbst eiribinden. 
Die Eingabe 

MC 7094 70CC (RETURN) 
listet die Sprungtabelle der Befehl- 
serkennungsroutine auf. Am An- 
fang der Zeile wird die aktuelle 
Adresse ausgegeben (z.B, :7094). 
Anschließend folgen 8 Hex-Bytes. 
deren Adresse erfährt man, indem 
man ihre Position (0. Byte, 1. By- 
te usw.) zur Zeilenadresse hinzu- 
zählt. Rechtsam Rand werden die 
acht Bytes noch als ASCIE 
Zeichen ausgegeben. Dies erlei- 
chert das Finden von Texten im 
Speicher. 


Die Werte können nun durch 
Überschreiben der Hex-Bytes ge- 
ändert werden. Dies müssen wir 
jetzt tun. 


In der folgenden Liste befinden 
sich an den unterstrichenen Stel- 
len geänderte Werte.: 


TA 1A 7B 46 78 


Nee 
g B 30 760 
7 2 70 % 
70 60 70 00 70 


7m 2 Bm TC 

LDA #8A, das zweite in LDA 

#7C. R 

Nun sind die Änderungen abge- 

schlossen. Legen Sie nun eine Dis- 

Si ein nal erben Sie folgende 
eile: 


S-FCMON 1+2° 7000 7CFA 
(RETURN) 


Die Floppy setzt sich in Bewe- 
gung und FCMON wird in der 
erweiterten Form abgesaved, 


Und damit Sie endlich erfahren, 
wozu Sie sich die ganze Arbeit ge- 
macht haben, folgt nun die Be- 
fehlserklärung: 


MEMORY DUMP: M 

Dieser Befehl wurde schon in der 
Einleitung erläutert. Die Handha- 
bung entspricht der des Disassem- 
blers (D). Computer und Floppy 
können gleichermaßen angespro- 


chen werden (MC bzw. MF). 


KONTROLLE: K 

Der Speicher wird in ASCII 
Zeichen auf dem Bildschirm dar- 
gestellt. Die 32 Zeichendarstel- 
lung ermöglicht ein schnelles 
Durchsuchen der Speicherzellen 
nach diversen Texten. Änderun- 
gen sind durch Überschreiben 
möglich. Ansonsten Han 
bung wie D. 


 OCCUPY: O 


Belegt einen Speicherbereich mit 
einem bestimmten Byte. Z.B. : 
OC 5000 5500 FF belegt den 
Speicherbereich von 35000 bis 
einschließlich $5500 mit dem By- 
te FF, 


Der Befehl läßt sich-auch für die 
Floppy anwenden, 


DOS: (Klammeraffe) 
hat zwei verschiedene Funktio- 
nen. (Klammeraffe} ohne weitere 


Angaben liest den Fehlerkanal 
(15} der Floppy .aus. Fehler, die 
früher nur als Blinken der roten 
LED erkennbar waren, werden 
aun auf dem Bildschirm identifi- 
zierbar. 


Wird dem (Klammeraffen) ein 
DOS-Befehl angehängt, so wird 
dieser zur Fioppygesandt. Man 
spart sich zum Beispiel für 
SCRATCHEN di 


die Sequenz 
OPEN 15,8,15,“$:Name* und 
tipp einfach (Klammeraf- 


fe)S:Name. Auch die anderen Be- 
fehle des 1541-DOS können ver- 
wendet werden. 


GO:G 3 
GC7000 startet das Maschinen- 
programm an der angegebenen 
Stelle. in Computer oder Floppy, 
Um in FCMON zurückzugelan- 
gen, muß das Programm im 
Computerspeicher mit BRK en- 
den. Floppyprogramme müssen 
mit RTS enden, da sonst der 
Floppyprozessor abstürzt. 


Eine Art kleiner TRACE-Befehl 


- bietet die Sequenz GC7000 7009. 


Der Computer arbeitet.ein Pro- 
gramm bis zur angegebenen Stelle 
ab und kehrt dann zu FCMON 
zurück. Dies gilt nur für den 
Computer, : 


Bedingung: An der Endadresse 
muß ein Befchi stehen und dieser 
muß. während des Programma- 
blaufs auch angesprungen wer- 
den. Außerdem darf sich die En- 
dadresse nur auf das RAM bezie- 
hen, weil an Stelle des Befehls ein 
BRK geschrieben wird. Beim 


Sompute mib 5187 





Treffen auf diese Speicherstelle 
kehrt der C 64 zu FCMON zu- 
rück und setzt den Befehl, der 
überschrieben wurde, wieder ein, 
um dann den Befehl 


REGISTER (Pfeil nach links) 
auszuführen. Der Programmzäh- 
ler (PC) urid der Registerzustand 
(SR = Statusregister, AC = Ak- 
ns XR = X-Register, YR = Y- 
ister) werden ausgegeben. An- 
sehließend wird das Statusregister 
genauer aufgelistet. Dabei bedeu- 
tet N = Negativiflag,.V = Over- 
flow, B = Breakflag, D = Dezi- 
malflag, I = Interuptflag, zZ = 
Zeroflag und C = lg 


Damit wir unsere eigenen 
Maschinen-Programme auch spei- 
chern können, steht uns ein 


schon oben benutzter Befehl zur 
Verfügung: 


SAVE: S 

Syntax: S“YNAME“ 7000 7011. 
Sfeicher den Bereich von 57000 
bis $ 7010 (!) unter Name als Pro- 
grammfile auf Diskette. Wichug 
ist, daß die Endadresse +1 des zu 
siehernden Bereichs angegeben 
wird. 


LOAD; L 

L*“Name“ ladeı unser Programm 
wieder in den Computer, und 
zwar ar seine Originaladresse, 
Während ae das 
ws an die Adresse $1000 


Vergessen Sie nicht, jede Zeile mit 
RETURN abzuschließen! 


programme 


Das war schon alles für dieses 
Mal. Jetzt kann FCMON schon 
einiges mehr. Die neuen Befehle 
eignen sich besonders zum Editie- 
ren von texten. Probieren Sie 
doch einfach mal KC7000. Sie se- 
ken nicht nur die Startmeldung 
FCMON’s, sondern ab 87074 
auch eine Befehlsliste. 

Diese zu ändern wäre wenig sinn- 
voll, doch gibt Sie Auskunft dar- 
über, was Sie noch an neuen Be- 
fehlen erwartet. 

Beim nächsten mal bieten wir au- 
ßerdem noch eine Befehlsüber- 
sicht in Form einer Tabelle und 
im vierten und letzten Teil veröf- 


fentlichen wir den komplet-. 


tenFCMON für alle Maschinen- 
spracheinteressenten noch mal als 
Assemblerlisting. 


PS. Ein kleiner Programmierfeh- 
ler muß noch ausgebessert wer- 
den. Damit der Disassemble- 
Befehl korrekt ausgeführt wird, 
müssen folgende $peicherstellen 
geändert werden: 


7A48 BNE 7A34 in neu: BCC 
7534 


7578 LDX #24 in neu: LDX 
#23 


Dies gilt auch für die bestellte 
Software auf Kassette und Disker- 
te, Erst mit dem Abschlußteil ver- 


öffentlichen wir nochmal den 
kompletten FCMON auf Daten- 


träger. 


Nicht vergessen, die Zeilen mit 
RETURN abzuschließen. 
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C-54 LISTING + CHECKSUMMEN (C v1.0) 


10 a " .£689> 
15 REM + — .<152 
18 r % 1 <7&> 
2u REM FEMGN TEIL2. DAT <196> 
22 REM ‘iC) BY J. STRAUSS <181>: 
24 z <B2> 
26 REM men 257 
28 a <E6> 
9B ı <156> 
1980 REM PRUESUMMEN EINLESEN <196> 
192 FORT = & TO 4 v: READ PSCT) 3 NEXT -(52> 
194 : <1s2> 
118 FORT = 8 1705 . <223> 
111 P&=B <59> 
112. ı FORTT. = 8 TO 9? <215> 
114 » .READ A 1. IF A<.: THEN 2BB- <26> 
115 ı PE=PS+A 5 .POKE 31AB8+THIGRHTT,A <1976> 
11& x NEXT <178> 
12@ x <178> 
121 FRENTPS <171> 
122 IF PS <> PS <T) THEN 300 <115> 
124 r <182> 
1264 NEXT <a> 
130 u <188> 
200 REM ALLES D.K. <u4> 
202 ı <4> 
204 IF PS <> 9045 THEN 308 <169> 
206 x ü <B> 
218 PRINT"{SPACEIALLEISPAGEIDATASTSPACE)IO.K. TDOH, 
NY"EPRINT <a2> 
212 x END <14> 
390 PRINT" ICLEARYFEHLERTSPALE) INISPALEIDATASTSPA 

cErır <89> 
302 PRINT" CDOHHYBLODCKE "Ti PRINT £65> 
394 END $177> 
306 x. <199> 
28000 REM PRUEFSLUMMEN | <134> 
29000 DATA 12135,12278,12846,12729,12242 <216> 
ZUR00 r 223» 
Sıanm ı <203> 
32008 DATA32,37,119,32,66,114,169,30,32,210,255, 
32,197,114,32,202,122,32,195 x28> 
32021 DAtA121,32,209,121,76,179,122,32,214,122,1 
67,31,32,188,121,160,8,209,37 <137> 
32092 DATA168,0,132,249,169,8,133,146,32,122,117 
,52,145,119,164,2498,153,92,3 <135> 
32003 DATA32,235,122,230,748,164,248,192,8,144,2 
37,96,72,32,227,119,104,76,206 <174> 
32044 DATA214,132,146,168,8,195,92,3,32,13,123,2 
00,176,146,144,245,96,281,32 ; <ZaB> 


52005 DATA144,4,201,128,143,2,169,44,76,218,255, 


32,1Q8,114,160,8,132,255,32,50 
SZa06 DATA2SQ,32,126,114,72,32,255,119,164,255,1 
83 ,153,92,3,230, 255,280, 192.8 
32007 DATA144,2%3,230,211,32,2727,114,32,253,122, 
32,66, 114,76,250,113,32,37,119 
T20QB DATA149,39,32,189,114,169,0,133,248,32,227 


,114,169 ‚32,133, a6. 133, 255,32 


32069 DATA122,119,52,145,119,32,135,123,198, 146,2 
06,296,32,19%5,121,32,209,121 

S201® DATA76,73,123,32, 108,114, 169,32,133,146,32 
‚50,258,32,132,123,199,14&,2B8 

32011 DATAZAF, 240 ,188,32,50, 230,201 ,46,240,3,76, 
255,118,76,13,119,76,24,114,169 

F2@12 DATAL,A4,169,0.133,146,32,161,123,76,64,12 
3,16@,2,132,188,136,132, 185,132 

F2n13 DATA187,136,132, 193,32, 50, 114,201 ,34,204,2 


.21,32,50,239, 1as, 187 ‚200,230 


32014. DATA153, 201,34, 203 "Zn 190,108, 185,2,133,1 
86, 165,146, 200, 23,32,58,114,201 

32815 DATALS,240,11,198,211,152,395,32,11@,114,t 
69,0,13%,105,169,8,198,48,3,162 

Z201& DATA193,32,11@,114,162,174,32,110,114,1BB, 
S@,3,32,204,255, 32,203,118, 32 

32017 DATASO,114,201,13,248,22,32,66,114,32,140, 
119,32,207,255,32,210, 255,201 

%2@18 DATA13,298,243,32,192,118,76,258,113,32,21 


' 9,118,198,211,32,50,230, 201,13 
32019 DATA24M,238,32,2108,259,200,244,32,232,114, 


32,108,114,162,252,32,11@,114 

32020 DATA3S2,121,114,133,146,145,196,32,255,118, 
32,195,121,176,246,32,232,114 

32021 DATAI62,85,32,110,114, 144,158, 209,24,32,58 
„114,201 ,13 ‚zaD,14, 198,211,32 

32022 DATALBB,114,160,8,177,172,133,164, 152,145, 
172,18%,166,188,05,0,52,122,124 i 
3202% DATN32,293,118,32,219,118,152,133,160,124, 
169,5,32,236,118,32,192,118,7& 

32024 DATAS4,123,165,85,141,136,124,185,B4,141,1 
37,124,96,77,45,69,44,193,162 


. 32425 DATAS,184,157,147,2,202,209,249,164,166,20 


8,4,165,164,145,172,169,204,160 
32028 DATA124,32,30, ITi LEmR 10932374 ABB LB IST: 
172,134,175,32,197,114,32,22 

32027 DATAiLA,162,252, i90 174, 1,32,204,114,32,22 
7,114,232, 208, 244 ,32,227,114 

32028 DATA173, 170,2,32,233,124,76,64,123,13,32,8 
0,67,32,32,83,02,32,65,67,32 


32029. DATAB9,92,32,87,02,32,32,78,Bh,45,56468,73 


78,67,13,0,133,146,162,8,6, 146 
32050 DATA169,8,1905,49,32,210,255,292,200,244,9& 
-1 
v 

ENDE DES LISTINGS 


Sompute mib 


<178> 
<59> 

<139> 
<222> 


<113> 


x224> 


<a9> 
4128> 
«19? 
<21> 
<111> 
<224> 
<225> 
<115> 
<234> 
<246> 
<179> 
<229) 
<111> 
<64> 
<147> 
<b> 
<22> 
<146> 
<20> 


<30> 
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programme 


x Minas Gundur 





Ein Textadventure der Spitzenklasse 


Vor langer Zeit lebten auf der Erde 
noch Zauberer, Hexen und andere un- 
heimliche Wesen. Kommen Sie und 
helfen Sie mit,das Böse zu bekämpfen. 


Was geschah mit dem Lehrmei- 
ster Magdalar, der Sie vor einem 


Jahr verlassen hat, um an einer ge- , 


fährlichen Mission teilzurieh- 
inen? Er war ausgezogen, um den 
grausamen Hexenmeister Garkor 
zu töten. Was hat der Traum der 
letzten Nacht zu bedeuten, in 
dem Sie Ihren großen Zauberleh- 
rer gefangen genommen sahen? 
Sie haben beschlossen, seiner Spur 
zu folgen, um ihm in seiner Not 
zu helfen. Als Ziel iss Ihnen je 
doch nur der Bedriff “Minas Gun- 
dur“ bekannt. Legenden besagen, 
daß es sich dabei um ein sagenum- 
wobenes Höhlensystem handelt, 


von dem niemand genau weiß, 
wo es sich befindet. 

Lösen Sie diese Fragen im Textad- 
venture “Minas Gundur“! Es be- 
sitzt einen eigenen Zeichensatz 
mit überdimensionalen Anfangs- 
buchstaben, die bei Raumbe- 
schreibungen und ähnlichem Ver- 
wendung finden. 

Der Parser versteht vollständige 
deutsche Sätze. So ist es zum Beı- 
spiel möglich, die Wörter “und“, 
“ıhn*, *ste* und “es“ zu benutzen, 
Es werden Artikel und andere 
Hilfswörter verstanden ebenso 


wie viele Synonyme (z.B.: GIB, . 


GEBE), alle Wörter können abge- 


6-64 LISTING + CHECKSUNMMEN IC V1.0) 


kürzt werden. Sie sollten nur dar- 
u aan daß keine Verwechs- 
ungen auftreten (UNT = unten, 
aber nicht untersuche. 
Ausnahmen bilden hier die Zau- 
berwörter, die Sie aber erst im 
Laufe des Spieles kennenlernen 
werden, 
Eine wichtige Regel gibt es aber: 
operieren Sie mit 2 Gegenstän- 
‚den, muß zuerst der genannt wer- 
en, an dem gearbeitet werden 
und danach derjenige, mit 
dem die Operation durchgeführt 
werden sol}. Beispiele: 
GEHE GEN NORDEN 
TOTE DAS MONSTER MIT 
DEM SCHWERT 


UND UNTERSUCHE IHN 
Es gibt folgende Systembefehle: 
INVENTUR 

listet alle Gegenstände auf, die der 
Spieler bei sich trägt, 


{SPACE -SPACENBITTETSFACEIWARTENTDONNZY" 
11t POKE S3289,Gı POKE 53281,8 





128 ADR=59392 
158 FÜR I=1 TO 128 


140 PRINT "TUP}" 11047985 19-0 


158 FOR d=B T0 15 
159 READ De 525+D;POKEADR,D 
178 ADR=ADR-+HIINEXT 3 


188 READ Cs IF &<S>C THEN PRINT"FEHLER! "END 


198 PRINT"OK":NEXT I 
2u0 GDTO 2298 Ü 


HILFE 

gibt in verfahrenen Situationen ei- 
nen Tip. $ie sollten diesen Befehl 
jedoch nicht zu oft verwenden, 
denn das könnte den Reiz des Ad- 
ventures mindern. 


t 
SPEICHERE 
kann der Spielstand jederzeit gesi- 
chert BR um ihn später mit 
LADE wieder in den Compouter 
zu holen. 

Der Befehl ENDE ist nur für Le- 
bensmüde gedacht. 
Mit FARBE können alle Bild- 


schirmfarben geändert werden, . 


die dann mit SAVE mitabgespei- 
chert werden. 


Die Taste mit dem Klammeraffen 
reproduziert den vorangegange- 
an Eingabetext in das Eingabe- 
ld. 


Und nun viel Spaß beim Spielen, 
alter Kämpfer! 


1 REM BEREICHE <A> 

2 REM ® MINAS GUNDUR * <224> 
3 REM # GESCHRIEBEN 1986/67 “* <34> 
4 REM #* Von PHILIPPF KOEHN * <79> 
5 REM # FUER TRGNIC VERLAG GMBH * <243> 
& REM HEREIN TIERE <9> 
73. <65> 
18 FOR 1=49152 TO 47242 <64> 
$@ READ A <39>. 
40 POKE I,A <217> _ 
5@ NEXT IıEYS 49152 «1357 
68 SY3 49201 <293> 
104 DATA 128,169,51,133,1,149,0, 153,95, 133,998,13 
3,98,1697,2909,133, 96,159 ,.228 _ <> 
121 DATA 133,91,169,2839,133,89,32,191 „1653,169,55 
„155,1,88,1649,24, 191 „24,288 <106> 
182 DATA 169,149,141,8,221,169, 196,141 „136,2,9& “a7? 
125 DATA 157,9,1353,95,133,98, 133,88,169,168,133, 
76,169,.192,133,89,133,91,32 <210> 
104 DATA 191,163,169,85, 141,161 ‚260,157, 1972,141, 
162,168,169,54,133,1,94,32 <182> 
185 DATA 138,173,76,247,183 «75> 


218 PRINTCHRE (142) "(CLEAR GREENTDATALSPACEILADER 


1208 DATA 0,192,0,42,110,102,50,0,0,8,124,142,12 
4,206,123,0, 1155 

1218 DATA D,249,96,124,102,110,220,9,8,0,60,102, 
96,224,124,9, 1516 

1820 DATA 8,31,6,62,192,102,59,8,0,0,62,1@2,124, 
227,124,8, 1003 

1038 DATA 14,27,24,62,24,24,60,24,0,3,62,102,182 
v63,19R,124, 913 3 
1049 DATA 216,76,96,124,102,250,182,12,24,49,0,5 
6,24,60,24,0, 1214 

185® DATA 12,0,12,38,12,12,12,24,224,96,124,102, 
124,108,238,P, 1130 

1848 DATA 58,28,24,24,24,60,24,0,0,90,238,255,219 
„219,219,0, 1308 

1970 DATA 9,2,234,254,182,102,239,0,0,0,60, 110,1 
02,192,58,8, 1367 

1980 DATA 8,0,220,1902,102,252,112,216,0,8,118,28 
4,204,124,28,54, 1736 


CSompube miß 


5/87 


1092 DATA B,0,236,118,76,248,76,8,12,6,126,192,1 
24,7,126,192, 1571 

11PR DATA 24,56,126,24,24,20,56,8,0,8,239,102,1@ 
2,126,55,0, 362 

1118 DATA 9,8,196,198,198,108,56,0,8,8,102,195,2 
19,255,110,0, 1439 

1129 DATA 8,0,110,56,24,20,118,0,8,8,239,118, 182 
,524,96,60, 1075 
1130 DATA 0,8,126,12,56,124,6,124,0,0,24,0,2,24, 

0,0, 496 

1148 DATA 0,230,0,239,1@2,124,55,8,0,0,12,8,8,12 
‚52,24, B2@ 

1159 DATA 108,8,124,134,126,198,123,0,40,102,102 
‚109,102,102,109,192, 1587 

n- DATA 9,8,0,8,0,8,0,0,48,24,24,24, 24,0,24,B, 
1170 DATA 182,102,102,102,0,0,0,0,0,216, ına ‚54,1 

88,218,0,0, 1110 

1149 DATA 8,54,10B,216,108,58,0,0,99,102,12,24,5 
1,99,0,0, 927 

1192 DATA 126,231,219,223,219,231,1264,0,6,12,24, 

9,0,0,0,0, 1417 

1208 DATA 12,24,48,49,48,24,12,0,48,24,12,12,12, 

24,49,8, 396 

1219 Datn @,102,24,126,24,102,0,0,0,24,24,126,24 
+24,0,0, 600 

1228 DATA 0,0,0,0,0,24,24,48,0,0,8,255,0,0,0,0, 
351 

1238 DATA 9,0,0,0,0,24,24,0,8,3,6,12,24,49,96,0, 
237 

1249 DATA 69,1@2,102,182, 182,102,60,0,24,56,120, 
24,24,24,126,0, 1928 

1258 DATA 40,102,6,12,24,51 ‚126,0,126,6,12,28,8, 
6,124,0, 689 

1268 DATA 192,96,108,188,125,12,12,0,38,48,96,12 
4,5,6,124,0, 14688 

1278 DATA 12,24,48,124,102,102,60,0,124,182,12,& 
2,24,48,48,0, 874 

1282 DATA 56,108,56,124,198,198,124 ,B,49, 102,182 
‚52,12,24,49,0, 1274 

1292 DATA B,0,24,0,0,24,8,8,0,8,24,0,0,24,24,48, 
168 

1398 DATA 8,0,2,9,0,24,24,48,0,8,126,8,124,0,9,8 
‚ 348 

1318 DATA 2724,40,24,252,24,48,224,0,120,204,178, 
12,24,8,56,@, 1358 

1322. DATA 9,0,8,127,0,0,8,0,126,199,54,102,126,1 
98,199,0, 1889 


13358 DATA 252,102,109,23R,102,102,120,192,4@,118 ° 


‚za0,200,209,1904,62,0, 2144 

i3a0 DATA 252,102,102,239,182,184,248,0,108,218, 
216,222,21& ‚242,124,0, 2378 

1358 DATA 31,124,238,108,108,108,248,9,62,112,21 
5 „219,311,118, 69,0, 1962 

136M DATA 252,96, 119,251,115,227,97,230,125,12,2 
8,68,28,28,56,8, 1718 

1370 DATA 235,199,38,14,38,6,124,172,249,48,102, 
236,120,256, 126 ‚198, 2155 

1388 DATA 244,104 ,232,194,232,107,126,190,126,21 
7 ‚219 ,255,219,219, 195,0, 2799 

1398 DATA 56, 109,230,102, 230,199,2064,2,49,139,21 
4,222,214,214,124,0, 2206 

1492 DATA 204.118.230,246,102,252,108,96,60,118, 
214,222,214,214,123,BD, 2521 

1410 DATA 256,118,79,230,236,102,243 40,126, 226,1 
89,214,123,142,252,0, 2535 

1420 DATA 126,194,128,216,216,214,124,0,197,192, 
199,198,199,2365,119,B, 2417 

1432 DATA 247,119,214,214,214,124,128,0,246, 126, 
214,214,214,222,119,0, 2606 

1445 DATA 195, 100,54,252,55,108,199,8,228,78,238 
4„182,250,124,192,126,i 2267 

1458 DATA 254,170,28,254,112,195,254,8,0,0,8,0,0 
»255,255,255, 2040 

1450 DATA 54,54,158,9,9,0,0,0,126,24 ,24,24,24 ,24 
‚124,0, 589 

1472 DATA 54,126,182,102,1265,1989,198,0,255, 127,6 
3,31,15,7,3,1, 14898 

1452 DATA 0,8,0,8,8,2,0,0,0,120,8,124,24,24, 126, 
u, 214 

1499 DATA 24,48,8,128,24,24,125,80,198,2,0,32,54, 
102,199,8, 857 

1502 DATA 0,0,0, 0.0,8,0,255,0,0,48,48,48,58,127, 
12, 376 

jan DATA 0,0,0,0,0,54,54,1088,5,3,3,3,3,3,3,3, 2 


<128> 
<148> 
%22> 

<> 

<219> 
<2358> 
«57> 

<199> 
«2257 
x227> 
x26> 

<1562> 
<130> 
<174> 
<«115> 
<197>7 
<144> 
x“62> 


* <iS5B> 


<14> 
<ıaB> 
“157> 
<170> 
<ı1B8> 
<38> 
<127> 
x3> 
<88> 
<1898> 
x69> 
“57> 
*177> 
“183> 
<x133> 
<42> 
<ı107> 
<1425 
<“85> 
“233> 
<1935> 
<213> 
62357 


<47> 


Programme 


1528 DATA 0,8,0,53,54,54,255,0,54,0,187,198,198, 
20&,118,0, 1308 

1538 DATA 3,3,3,3,35,3,3,3,182,0,40,102,126,96,48 
‚@, 370 

1548 DATA 126,8,60,182,124,96,62,0,124,@,12@,12, 
124,204,126,0, 1282 

1558 DATA 8,0,0,248,248,24,24,24,0,0,0,0,0,0,255 
‚255, 1978 

1558 DATA 24,48,120,12,124,284,1265,83,12,24,60,1@ 
2,126,76,62,0, 114@ 

1572 DATA 98,0,8,255,255,24,24 ,24 ,24 ,48,254 ,182,2 
48,182,254,0, 1614 

1588 DATA 9,0,0,0,0,0,8,0,0,124,8,102,102,102,52 
‚B, 494 

1579 DATA M,126,2,50,102,102,50,90,255 
0,0,0, 968° 

1429 DATA 12,24,2378,1902,192,192,62,8,12,24,60,18 
2,192,102,68,0, 1184 

1518 DATA 178,68,119,214,227,214,124,0,253,253,2 
55,255, 259, 255,255,255, 3199 

1628 DATA 255,255,255,255,255,255 255,295, 255,25 
5,295 ,255,255,255,255,255, 4998 2 
1638 DATA 240, 249,249,240,0,9,8,0,295,255,255,25 
5,255,255,255,255, 32008 

1548 DATA 31,127,195,97,7,7,14,14, 134,204 235,25 
2,124, 682, ‚dd,60, 1624 

1&sa DATA 31,29,60,62,123,291 ,240,0,232,60,60,12 
4,254,156, 24.0, 1715 

1569 DATA 63,259,206,29,29,59,123,251,184,124,28 
6,134,134,28,240,24B, 2515 

1670 DATA 221,27,125,253,223,63,113,224,156,230, 
252,148,158,248,249,0, 2585 

1668 DATA 8,25,51,1905, 110,204 ,206,206,192,248,25 
2,204,192,192,192,192, 2563 

1698 DATA 204,236,120,124,63,15,5,8,192,192,192, 
206,252,24B,224,0, 2273 

1708 DATA 255,127,13,27,27,39,27,123,248,248,252 
‚t0B,40,60,252,48, 2010 

1718 DATA 251 ,59,59,115,237,223,49,.0,252,56,128, 
240,224 ,128,0,0, 2014 

1720 DATA 28,49,79,103,231,231,231,5231,192,240,1 
24,94,76,88,126, 126, 2247 

1739 DATA 231 ‚231,192,124,63,15,90,0,64,64,78,92, 
248,224,8,0, 1524 

1748 DATA 0,56,63,51,123,253,221 ,29,96,254 ,255,2 
24,224,252,248,224, 2585 

1759 DATA 29,27,29,27,119,255,222.0,224 224,224, 
192,192,128,0,8, 1874 

1760 DATA 7,31,62,110,110,239,238,239,192,240,25 
2,56,8,24,124,206, 2127 

1778 DATA 238,238,1190,188,56,3147,0,284,254,206, 
220,249,240,192,0, 2354 

1768 DATA 254,253 ,27,59,51,55,246,246,248,249,12 
8,128,152,68,118,197, 2448 

1778 DATA 55,95,246,287,54,55,127,192,143,255,15 
»255,15,238,206,24, 2192 

1022 DATA 31,63,3,7,7,7,31,63,220,176,112,112,11 
2,112,112,112, 1280 

1810 DATA 7,7,7,14,49,127,9,2,112,112,112,112,22 
4,192,0,0, 1074 

1828 DATA 43,295,192,216,113,3,0,0,255,252,59,54 
‚228,238,238,2358, 2413 

18398 DATA 3,7,1,1,3,127,259,192,230,258,222, 168, 
169,120,224,8, 2007 

1848 DATA 126,253,205,13,29,29,125,253,192,128,1 
28,128,128,182,188,258, 2315 

1858 DATA 29,29,125,253,57,103,255,9,204,152,1B4 
‚249,156,239,246,0, 2206 

1868 DATA 127,255,206,29,125,253,29,29,1B4,112,2 
24,192,.128,128,128,128, 2277 

1878 DATA 125,253,27,27,63,127,192,0,129,128,128 
‚0,227,255,62,0, 1749 

1880 DATA 14,38,63,37 ,37,57,57,121,120,251,254,2 
06,206,206,286,204, 2111 

1099 DATA 255,57 ,37,57,97,123,291 ,0,254 206,206, 
206 ,204,239,204,0, 2374 

17@@ DATA 3,15,59,39,251,123,39,251,240,248,68,3 
2,14,14,14,28, 1448 

19718 DATA 123,59,59,59,59,243,259,9,28,56,56, 46, 
110,124,124,8, 1414 

1928 DATA 7,15,31,55, 119,247 5231 ,231,224,240,40, 
30,50,254,14,14, 1818 

1930 DATA 251,251 ,247,118,124,53,15,8,14,254,14, 
20,60,240,224,0, 1871 

1948 DATA 97,249,31,31,125,253,29,29,128,248,24B 
‚180,156,252,132,252, 2448 


+25,0,0,0, 


Compube mik 


“> 
<76>, 
<111> 
<189> 
«227> 
<173> 
2111> 
x79> 
<244> 
<134> 
<213> 
<z8ä> 
“a> 
<141> 
<175> 
<a> 
<174> 
<83> 
<171> 
<77> 
<16> 
<187> 
<225> 
<31> 
<125> 
<146> 
x93> 
<242> 
<63> 
«145> 
<69> 
<97> 
<114> 
<19B> 
<17&> 
<148? 
«281> 
<94> 
ans 
<161> 
<193> 
«199 
<26> 
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Programme 


1958 DATA 29,29,127,255,221,29,29,31,156,155,248 
+248,128,128,128,@, 1934 

1768 DATA 7,15,30,62,11B,231,230,230,192,249,120 
,56,60,252,60,6@, 1963 

1970 DATA 250,231,118,127,63,15,8,8,40,252,56,12 
0,243,254,204,0, 1973 

1788 DATA 112,249,59,63,59,123,251, 123,224,240,5 
&,28,19,12,24,48, 1485 

1998 DATA 59,59 ,59 39,59 ,127 255,0, 224,224 112,1 
12,59,42,29,0, 1498 

2020 DATA 31,63,124,124,2359,199,225,123,254 ,252, 
24 ,48,224,248,198,28, 2394 

2a1@ DATA 63,65,24 48,97 ,255,255,0,284 ,204,220,2 
48,248,248,192,0, 2361 

2@2@ DATA 31,127,239,15 „31,59,115,115,254,252,9& 
»96,76,96,96,96, 1814 

2038 DATA 115,118,115,110,63,15,0,8,98,96,96,182 
,252,249,0,0, 1423 

2DAB DATA 255,25%,31,59,123,115,243,243,27,62,80 
+68,252,650,40,68, 1965 

2050 DATA 243,243,115,123,63,15,0,0,252,68,40,12 
4,236,222,12,0, 1768 

29m DATA 76,223,31,61,59,123,119,118,215, 220,14 
2,154,6,6,198,238, 1782 

2074 DATA 119,54,54,54,62,127,192,8,6,12,24,48,9 
6,192,0,0, 1959 

2288 DATA 124,253,408,125,237,206, 286, 296,239 „255 
»238,238,110,119,110,118, 2829 

2098 DATA 205,207 ,207 ,109,109,63,12,8,110,118,11 
@,238,239,124,50,0, 1906 

z1ma DATA 112,248,60,30,15,7,63,127,12,38,54,96, 
192,192,290,248, 1726 

2110 DATA 7,15,25,48,224,192,0,0,192,224 244,252 
‚122,498,8,@0, 1593 

2120 DATA 225,247,123,59,251,123,57,59,192,112,5 
6,56,252,68,69,252, 2186 

2138 DATA 251,123,63,127,224 ,224 ,127,0,60,60,248 
‚240,0,248,204,0, 2197 


<21> 
<42> 
<«289> 
<Zu1> 
<173> 
<1282 
«15? 
<72> 
<al> 
<2? 
«2457 
<24> 
<205> 
<203> 
<95) 
<192> 
<Aa7> 
<1a> 
<i9B) 


2148 DATA &3,127,224,8,0,1,63,7,255,254,68,128,2 
40,224,248,128, 2014 
2150 DATA 127,30,68,120,255,255,0,8,224,0,0,6,25 
4,252,0,0, 1583 
2158 DATA 255,255,253,201 ,201 ,201 ,8,255,57,255,5 
7,57,537,37,129,255, 2547 
2170 DATA 252,252,252,252,252,252,252,232,153,25 
5,195,153,129,159,175,255, 3518 
2188 DATA 129,255,195,153,129,159,193,255,131,25 
5,135,243,131,51,129,255, 2798 
2198 DATA 255,259,239,7,7,231,231 ,231 ,255,255,25 
3,255,255,255,.0,8, 3082 
2208 DATA 231,207 ,135,243,131,51,129 ,255,243,231 
‚195, 153,129,159,193,255, 2940 
2210 DATA 255,255,255,8,9,231 ,251,231,231,207 1, 
153,7,153,1,255, 246h 
2228 DATA 255,255,255,255,7255,255,255,255,255,12 
9,255,153,153,153,193,255, 3506 
2230 DATA 255,129,255,195,153,193,195 ‚255,0,8,25 
5,259,235,255,255,255, 3120 
2240 DATA 243,231,17,153,153, 153,193, 295,243,231 
„195,158,153,133,195,.255, 2976 
2259 DATA 57,131,57,37,57,57,131,255,8,8,8,0,0,8 
‚2,0, B02 
2240 IMTA 8,0,0,0,0,0,8 
„129,255, 1405 ‚ 
2270 DATA 15,15,15,15,255,255,255,239,255,153,25 
5,195,1935,153,195,255, 2694 
279 REM 
2279 IF PEEK(18&I<>E THENPOKE#SI ,131:POKE1FU, 1: N 
Eu 
2308 PRINT“ CCLEARILDAD"ZCHRE 34) 3 "MAIN”SCHR$ (3A) 
3 » ‚B" 
2318 PRINT“ (DOWNSYRUN" 
2328 POKE178,S5ı FPOKESI1 „197: POKESS2 , 131 POKESIS „138 
NEW 

ENDE DES LISTINGS 


‚@,255,297,135,243, 131,51 


* 


<28> 
<281> 
«224> 
<ı1a5> 
<84> 
<205> 
<147> 
<23> 
<75> 
<201> 
<A4> 
<93> 
<191> 


<3> 
<127? 


63) 


<24&> 
g222 


x2> 


C-64 LISTING + CHECKSUMMEN IC 1.8) 


18 REM SHE 

20 REM # MINAS BUNDUR 2 

Sa REM # PHILIPF KÜEHN 1954 = 

49 REN RBB 

Sg + 

2 GOTO ABGB 

188 IF UX THEN X=X+11G0T0 2198 

110 POKE 646,F2: PRINT" CDOHNI >" B6="" 

129 PRINT"ICB LEFT+I" 

138 GET AlsılF Alte"" 5010 139 

131 IF Al$="@" AND LEN{B$) +LEN (BA$I<3S7? THEN PRIN 
TBA$I s BE=BF+BA$S: GOTO128 

135 AS=CHRF(ASCLALSIANDL27) 

148 IF A$=CHR$I13I) AND BE<>** THEN PRINT" SPACE} 
":BA$=BsıGOTO 208 

15@ IF A$=SCHRE (20) AND Be<>"* THEN B$SLEFTST{BS,L 
EN (B&) -1) ıPRINTASI 

18@ IF LEN{BSI?IS DR (IASC"A" OR AS>"ZI)AND Asc> 
P{SPACEI") GOTO 128 

178 FRINTAI$T ı B$=BI+HAS$ 

188 60rO 128 

198 a 

208 FOR I=1 TO 1BıWs(De"*ıNEXT I 

205 Aß=HIDS(B6,1,1) 

zB W=el1FOR 1=1 TO LEN(BS) 

207 A$=MIDS (B£,I,1) 

218 IF AS="ISPACE}" AND WEtW)<>"" THEN Werl 

220 IF A$<H"<SPACEI” THEN WE ENEI AF 

238 NEXT I 

242 IF UetWI="" THEN Wau-i 

258 IF WB THEN PRINT" t4P23"A1G0TO 118 

Söh ı 

400 Yalsv=a 

412 0M=D:D=B1 01=-Bslli=B; 76=765+1 

428 FORI=1TOAH: IFH$ CI) EH$ (XI GOTOSLR 

A211 NEXT | , RR i ' ß 

424 FORT=1TOAVr IFLEFTSCUSCT) „LENINS CI DIES CK I TH 
ENV=I-VAL (RIGHTS (VE CI) , 1) 1GOTOSIG 


425 NEXT 
438 "FORI=1TDADı ır0X%(1 „EI=STHENIFOFCTI SWS (RI THEND 
1-I 50T0598 pz 


<183> 
<242> 
<33> 

«2137 
<1B8> 
<173> 
<1737 
<123> 
<16> 

<97> 


*122> 
<232> 


<240> 


<Aal> 
<248> 
<245> 
<248> 
<9B> 
<148> 
«2357 
<1532> 
<7> 
437 
<250> 
<ötl> 
<178> 
<143> 
<2427 
<t1u3> 
<164> 
<40+ 


<24> 


Kaa> 
x51> 


431 IF 0%2(1,0)=5 GEOTO 435 

432 IFLEFT$IOF(TY „LENCRSCHI PI=US CR ITHENDI=I-VALL 

RISHT$ {G$(T) „19 1 GOTOSBQ 

435 NEXT 

458 IF WEIRI="ES" DR WEON="IHN" OR WEIK)="SIE" 

THEN O1=fM:GOTQO 588 

448 IF KSEXI=*UND" THEN UX=1:280T70 538 

478 ZG=e28-13A$=" TSIICHISPACEIKENNETSPACE HRS CH 

IH" SISPACEILEIDERTSPACEFNICHT, "ıGOSUB 5B108: GOTO 
138 

28 IF 0=8 THEN 0-01:01=9 

Jim K=i+i 

528 IF X=%# GUTO 428 

538 FF%-2: BOSUB 1820: IF FF%=D THEN EOSUB 6088 

3548 GOTO 183 

1252 IF 0X(0,0)=5 AND V=B THEN Vo33 

19881 IF D=3 AND RR=1& THEN 0=27 

1882 IF V=51 THEN v=33 

1935 POKE 646,Fi1 

1810 IF V=B AND O=8 THEN PRINT” LSDIEINCSPACE 55 

ATZISPACEISCHEINTISPAGEIMIRISPALEFNICHTSESPACEIA 

USSABEND. "s RETURN 

4028 IF v=R THEN PRINT" {SIYMISPATE SSIYATZTSPACEY 

FEHLTISPACEIDERTSPACE SS} INN! *F RETURN 

1099 REM *###% RICHTUNGEN 

1188 IF V>& GOTO 1428 

1119 IF RACRR,VI=R THEN PRINT* {SDHAHINTSPALEIKAN 

NSTTSPACE3DUTSPALEINICHTTSPACEIGELANGEN. "SRETURN 

1128 RR=RACRR,V 

1208 PRINT" DOWN” 

1285 IF RR=5 THEN. IF. 0% 9,1)>=8 THEN RR=& 

1205 IF RR=11 THEN IF FXt10)=B AND FX(13)=9 THEN 
T-8ı60T0 12000 

1254 ZI=RFCRR) 1 BOSUR 59808 

1237 IF RA(RR,GI=Q THEN RRIRR,@)=130=0+1 

1238 ZP=78 











‚1248 GDEUB 4OBEEHRR=12D 


1259 F=B: FOR I=1 TO AD 
1248 IF DXII,@I<CH4 DR OXLCI,LI<HRR EDTN 1298 
1278 IF F=B THEN F=l1PRINT" (SH IERCSPACEILIEGTLS 


BACEI"R. 


1271. IF PDBCII+LEN(VE(IDI>S2 THEN PRINT 
1272 PRINT-EINY; 

1273 IF OX(1,2)=1 TBEN PRINTPE"j 

1288 PRINT“ {SPAGEI"JCHRECASCLOS CE) +12) KMIDS CDS 
KID 5295" .XSBACEI"; 


Compube mib 


25> 


<172> 
<54>. 


<195> 
<154> 


<216> 
<191> 
<96> 
<18977> 
<1a6> 
<B97>. 
<S51> 
<2397> 
<152> 


<x627 


<737> 


<250> 
<5B> 
x225> 


xa8> 
<218> 
<76> 
345 


«1823 
<1Aa> 
<2B>. 
<181> 
<284> 
<92> 
<2> 


<1B6> 


72077 


<i187> 
32 


<246> 


5/87 


—. 


5/87 


1290 NEXT L1r F THEN PRINT" {LEFT2I,* 

130@ F=B:FER I=1 TO & 

131AM IF RXCHRR,I}=A GOTO 1358 

1328 IF F=2 THEN F=i1s5 PRINT" {SDIUFSPACEIKANNSTISE 
ACEFNACHISPACEY" 35 

13520 IF POS (TI +LEN(VS (DD) 337 THEN PRINT 

1548 PRINTCHR$ (ASC (VS) 341289) 1 MIDESVSCDI I" ,t 
SPACEY"3 

1558 NEXT I 

1349 IF F THEN PRINT"{LEFT2Y." 

1378 F=B: RETURN 

1597 REM “um NIMM 

1408 IF Vv<>7 SOTD 1529 

1418 1F 0=B THEN PRINT” CSHIASISPACEISOLLISPACEII 
CHLSPATCEINEHMEN?" 4 RETURN 

1428 IF 0%(0,41)=-1 THEN PRINT" (SDIASTSPALEIHABEL 
SPACEY ICHISPACEISCHON. "RETURN 

1425 IF DX(O,1)<>RR THEN PRINT" SDIASSPACEISEHE 
tSPACEI ICHLSPACEIHIERSPACEINIRGENS. ": RETURN 
1438 IF 0%210,0)=3 THEN PRINT" SHIASSPACEISOLLS 
PACEIDIESER{SPACE SUINSINN?” RETURN 

1448 IF 0%X(0,@)<>1 THEN PRINT"ISPIASTSPACEIKANNG 
TISPAGEIDUITSPACEINICHT {SPACE }NEHMEN. * RETURN 
1459 (14 0,t)=-1aPRINT"ISIINESPACE SOIRDNUNG. ":RE 
TURN 

1499 REM weuu# GIB 

1588 IF V<>18 GOTO 1ABB 

1519 IF G=B THEN PRINT" CSWIASTSPATEISENLLCSPACEIT 
CHISPACEYABLEGEN?"SRETURN . 

1528 IFOX(D,13<>-1 THENPRINT" ISDIÄS{SPACEIBEFINDE 
TISPACEISICHLSPALEYNICHT TSPACEY INTSPACEIMEINEMIS. 
PACE SBYIE-ISPACEIIEITZ,. N3RETURN 

1525 IF RR=12 AND D=5 WITO Zrang 

1558 0210,1)=RR=PRINT" ISIIN{SPAGE SorrDInn," 
1551 IF 0-14 AND FAtil)=f THEN FFZ=1:G0T0O 5552 
1552 IF D=eid& THEN FF#Z=1:60T0 4458 

1598 RETURN 

1597 REM *#### UNTERSUCHE 

i6BQ IF V<>14 GOTO 2928 

1518 IF 0=8 GOTO 1208 

1628 IF 0%X<0,2)<>RR AND DX(0,1)<>-1 THEN FRINT"’T 
SDIASTSPACEISEHETSPACEY ICHTSPACEINIRGENS. "sRETUR 
N 




















1634 IF 0=2 THEN PRINT ISDIERTSPACE STIISCHISPAG 
EIBEBITZTISPAGEFEINETSPACE SSYCHLBLADE, (SPACEIDI 
E" 

16531 IF 0=2 THEN PRINT“ANSCHEINEND {SPAGEFUNVERSE 
HLOSSENTSPACEY IST, ":RETURN 

1555 IF D<>A OR FAtä)=f OR N%t1,1) GOTO 1848 
1634 PRINT"{SEYRISPACEITRTGTISPACEIEINTSPACEIST” 
HLERNESTSPACE SSHEHWERT ISPATCEIUND" : Q=8+2 

16536 PRINT" £SKIOMPASS{SPALEIBEL CSPAGEISICH. ":0%t 
1,2)=RR:0%4(9, 1)=RR:RETURN 

1848 IF 0<>15 GOTD 1558 

1641 IK R%(19,6) G0TO 1658 

1442 PRINT" (SA INTERCSPACEIEINENISPACE SBHISCHTS 
PACEIAN{SPACEIDERLSPACE SFIELSWAND" 

15453 PRINT"ENTDECKST{SPACTEIDUTSPACEIEINEN{SPACEI 
DUNKLEN{SPACE SGIANG. (SPACE SDIAS" 

1644. PRINT"MLI_ISPACEIEINSPACE SEIINGANGLSPACEIZ 
UMSPACEISABENUMWOBENEN" 

1645 PRINT" ISHIEHLENSYSTEM{SPACE SHIINASISPACE S 
GIUNDURTSPACEISEIN! "1 Q=Q+31R7 (18,6) =11: RETURN 
1650 PRINT" CSHIINTER{SPACEIEINEM{SPACE SBIUSCHTS, 
PACEIFAHRTISPACEIEINTSPACE SGYIANG" 

1451 PRINT"HINABLSPACEIINISPACEIDASTSPACE SHI@HL 
ENSYSTEMISFALEIVON(SPACE SHIINAS" 

1452 PRINT" (SGYUNDUR. "RETURN 

1448 IF 0<X>380 GOTO 167H 

1661 PRINT" (SDIERTSPACEIKREISRUNDEISPACE SBIYRUNN 
EN{SRALEI ISTISPAGEIFASTISPACEIBIB" 

1662 PRINT" ZUMCSPACE SRIANDTSFACE IMKTISPACEIETINE 
RISPACE>VIODLETTEN{SPACE SFIL\SSIG-" 

1663 PRINT"KEITISPACEIGEFNHLT ,{SPACEIDIETSPACEIA 
UF CSPACEIMERKW\RDIGEISPACE SAYRT" 

16464 a PRINT" (SEINERBIETSPACEIABSTRÄHLT. "ZRETURN 
1678 IF D=-31 AND FAtIiB)<2 GOTO 29208 

1990 PRINT"<SISCHLSPACEIKANNTSPAGEIKEINETSPACE S 
B}IESONDERHELTENTSPALEIERKENNEN. ": RETURN 

1797 REM #3 INVENTUR 

za0@ IF V<>1&4 GOTO 2108 

281@ PRINT" {SBIUISPACEIBESITZTISPACEI"zıF=B 

2028 FÜR I=1 TD AD 

2038 IF DAcI1,1)<>-1 THEN 2074 

z2a44 IF LENIOS(TII+POESCIY>S2 THEN PRINT 

2450 PRINT"EIN”’JEIF DA<1,2) THEN PRINT"E”J 





























<189> 
1887 
“16&> 


<191> 
<98> 


<117> 
955 
<i10>: 
«71> 
<116> 
<1a5> 


<22> 
69? 
<131> 
<10> 
<67> 


1957 
<hö> 
397 


s11B> 


93 
<183> 
<94> 
x48> 
<189> 
<202> 
sıid> 
<118> 
<175> 


2287 


X221> 


%138> 
*3> 


<149> 


<213> 
a) 
<181> 


592 
<777 
<108> 
<142> 
<171> 


<t18> 
<25> 
<1a> 


xFm> 
<x218> 


<ZAam> 
%33> 
<92> 


<1351> 
<235> 
<28> 

<247> 
<187> 
<194> 
<132> 
<a7> 


programme 


2955 IF OZt1,23=2 THEN PRINT"N"z 

20s0 PRINT" {SPACE} " 3 CHR$ tASC (0$ 1) )DRL28) ;MID# (O 
SD, "„ISPACEI"z:Fei 

20798 NEXTIIF Fl THEN PRINT"{LEFF2}.” 

2088 IF F=B THEN FRINT“NOCH{SPAGEINICHTS. * 

28798 IF 0%421,1)=-2 THEN PRINT" SDILTSPACEITR"GS 
TISPACEIEINEISPACE STIARNKAPPE.* 

2995 RETURN 

20977 REM ##### HILFE 

zıaua IF v<>18 GDOTO 22a 

Z11@ IF RR=1 THEN PRINT" {SSIESAM, TSPACEI@FFNETIS 
PACEFIEUCH! ":RETURN 3 

2111 IF RR=3 THEN PRINT" SBIEACHTEISFAGEIALLES, C 
SPACEIWASCSPACEIDUTSPALEIHAST TSPALCE}UNDTSPACEIWA 
STSPACEIDUTSPALEIISIEHST! "RETURN 

2113 IF RR=8 THEN PRINT"(SHIABE(SPACE SVIERTRAUE 
NISPACEHINISPALCEIGUTEISPACE SHIESEN. {SPACE SEYIN 
EN" 

2124 IF RRe8 THEN PRINT" {SGIEGENSTANDTSPACEIKANN 
STISPACEFIDUCSPACEINUNTSPAGEIEINSPACE)I ZWEITESCEP 
ATE SHFALBENUTZEN. "zRETURN 

2115 IF RR=1A THEN PRINT’ SHIACHETSPACEIDICH(SPA 
CEIMITISPAGEIDEINERTSPACE SUIMGEBUNGISPACEIVETRA 
UT, “+ 

211& IF RRr=1@ THEN PRINT"MUTZETSPACEISCHLECHTETS 
PACE 543 MSTONDE (SPACEFPOSITIV” 

2128 IF RR=12 THEN PRINT" {SDIASLSPACE SBIUCH{SRA 
GEH ISTISPACEIDIELSPACE SAPUSZEICHNUGTSPALEFFNRIE 
PACEIDEN" 

2121 IF RR=i2 THEN PRINT"WEISESTENTSPACE SZYAUBE 
RER. "ı RETURN 

2125 IF RR=14 THEN PRINT" CSNIUMRLSPACEHKEINE CSPAC 
£ SAYHNGST!"zRETURN 

21350 IF RR=15 THEN PRENT*®{SDIUTSPACEISOLLTESTTSR 
ACE SGHESCHENKEISPACEIMEHRLSPACEIACHTEN! *:RETURN 
2135 IF RR=1& THEN PRINT" CSHIDZULSPALCEIHAST (SPAL 
EIDUISPACEIEIN{ISPACE SSICHWERT?" RETURN 

2148 IF RR=17 THEN PRINT" CSBIEACHTETSPACEIDENISP 
ACE SBIRLINNEN, {SPACEIÄABERTSPACEIVERGI_(SPACE SH} 
AGDA-ISPACEILARLSPACEINICHT! "RETURN 

2145 IF RR=18 THEN PRINT" {SRINCKZUGTSPACEHISTESP 
ACEIDIE{SPACEIBESTEISPACE SVIERTEIDISUNG!* 

2145 IF RR=1B8 THEN PRINT"ISAIBER{SPACEINICHTISPA 
CEFNACHTSPAGE SSH\DEN! "RETURN 

2159 IF RR=17 THEN PRINT" ISHIAST{SPACEIDUTSPACEI 
DENISPAGE SZIETTEL{SPACEI VERGESSEN?" Ss RETURN 

2195 PRINT*ISDYEINISPACE SRIUFLSFACEIVERHALLTTSP 
ATEFUNGEHART {SPACEFIMISPACEIGRENZEN-" 

219& PRINT”"LOSENISPACE SSIPEICHER(SPACEIBESTSPAC 
E SCHOMPUTERS. "ıRETURN 

2197 REM ses LADEN 

2200 IF V<>3197 GOTO 235280 

2201 FRINT”ISHYUMMERISPAGEIDESISPACE SSIHPIELSTAN 
DES{SPACEIKI-PIa {SPACE CB LEFTI"T j 

22B4 GET A$:IF A$="" GOTO 2204 

2285 IF A$<"1" DR AS>’'9" THEN FRINT"@"SRETURN 
2224 PRINT As:6050U8 Zıama 

2287 N$="SPIELSTAND{SPACEINR. "+A$ 

2288 IF G$="D" THEN OPEN 8,8,3,N6+",9,R" 

2289 IF G$="C" THEN OPEN 8,1,0,N# 

2212 INPUT# 8,RR 

2213 INPUT# 8,A 

2214 FOR I=1 70 A: INPUTB 8,0% (1,1):2NEKT 

2215 INPUT# 8,F1,F2,CL,A 

2214 POKE 53294, Ar POKE 33201 ,A 

2220 INFUT# 8,A 

2221 FOR Ist TO FOR J-B TOD S1INPUTR B,RKII,Da 
NEXT 4,1 “ 

2223 INPUT# 8,0,25,AF 

2224 FOR I=B 10 AFs INPUTR B,FACH NEXT I 

2225 CLOSE 8 a 

2234 FOKE 544,F14PRINT"<CLEAR?":6OTO 1285 

225997 REM “Weiss SPEICHERN 

23508 IF >21 GOTO 2408 

2501 FRENT"XSH3UMMERTSPAGEIDESTSPAGE SSIPIELSTAN 
DESTSPACEIKI-9) {SPACE CB LEFT}I", 

2384 GET At: IF A$="" GSOTO 2394 

2305 IF Ag<"i" DR AS>”"9“ THEN PRINT*@"ZRETURN 
2306 FRINT A$ r ? 
23507 N$="SPIELSTANDLSPATEINR. "+A$ 

2308 GOSUB 21828; IF G$="C" THEN GBPEN 8,1,1,N$ 
2549 IF G$="D" THEN OPEN 1,8,15, "8: "+NSTCLOSE ir 
GPEN 8,8,3,N$5+" 5,4" N 

2312 PRINT# 8,RR 





























"2315 PRINT# B,A0 


2514 FOR I=1 TO AG:PRINT# 8,0Z1I,.1)aNEXT I 


Compube mib 


<157> 


<24> 
<1877> 
<30> 


<195> 
<197> 
<177> 
<158> 


<15> 

<239> 
<ı1a0> 
<174> 


<156&> 


<37> 


<154> 
<217> 
<126> 
<184> 
x57> 


<212> 
<76> 
<11> 
«126> 
<150> 


«1647 
«23. 
<9> 


<127> 
<219> 
<124> 
<ıms> 
<1Q6> 
<149> 
<3> 
<6> 
<41> 
x247> 
412977 
<171> 
<40> 


<1> 
<193> 
21827 
<201> 
<215> 
<192> 
<75? 


x227> 
x77> 

<225> 
<145> 
<207> 
<130> 


<72> 
1277 
<45> 
<129> 



































Programme 


2315 PRINT# 8,F1 
2315 PRINT# 8,F2 
2317 PRINT# B,Ct 
231B PRINT# 8,PEEK1S3288} 
2328 PRINT# 8,AR 


‘ 2321 FOR I=1 T0 ARsFOR J=8 TO 6:PRINT# B,RXCI,TD 


NEXT J,I 

2323 PRINT# 8,0: PRINT# 8,26:PRINT# B,AF 

2324 FÜR I=8 TO AFSPRINT# B,FXKCDISNEXT I 

2325 CLOSE B 

2348 RETURN 

2399 REM #tr## FARBEN AENDERN 

2488 IF v<>24 GOTO 2502 

24190 PRINT" (DOKN} «NDERE{SPACEIDIELSPACE SEIARBEN 
(SPACEINACHTSPACEIDEINEMISPACE SHIUNSCHE " 

2429 As=" SH} INTERGRUNDSFARBE" ı F=PEEK (53288) 1608 
uUB 58208: HF=F 

2430 As="SFIARBEISPACEIDESTSPACE SGIROSS-TSBIUC 
HSTABENS*" + F=CL:G0SUB 59200: CL=F 

2449 A$="{SFIARBELSPACEIDES(SPACE SAYUSGABEN"yF= 
Fi:60SUB SR20R: X=F 

2450 As=" (SFIARBELSPAGEIDERISPACE SEHINGABEN"sF=- 
F2ıG60SUB 59200: F2=F 

246B Fi=X:POKE 445,K:POKE 53288,HF:POKE 53281 ,HF 
aPRINT"IE LEARI":GOTO 1285 

2497 REM #xu## PUNKTE 

25aq IF V<>25 G0TO 2400 

2518 A=INT(1DAB-U/PM)/10 

2528 PRINT" (SDIULSPACEIHAST”EINTIR 3 *CSPIUNKTA ES 
IF 0<>1 THEN PRINT"E"; 

2525 PRINT"{S SPACE FERRINGEN<SP AGCEIKENNEN” 

2538 PRINT"UNDCSPACEIDAMIT" Ay "CLEFTIRLSPAL E}IDES 
SPACE SSIPIELESTSPALEIGELEST,* 

2572 RETURN 

2597 REM »#4##«* LIES BUCH vr 

26m IF V<>22 60TO 2708 

ZeB1 IF 0<X>5 GOTO 2638 

zUR2 IF D%RIR,1I<>-1 THEN PRINT" SIICHLSPALEIHABE 
TSPAGEIKEINTSPACE SBILCH. "RETURN 

2684 IF RR<>S OR FXt5} GOTO 2418 

26485 PRINT"H{SDIASTSPACEIMABISCHELSPACE SZIAUBER 
WORTISPACE Er>XYLKSCC- SPACEIVERMAG”SB=B+S:FR (5) 
=i 

26486 PRINT"DEM{SPACE SANUSSPRECHENDENTSPAGEIFNRE 
SPAGESKURZEISPACE SZIEITTSPACEIDIE® 

2687 PRINT"ISGHABEISPAGCEHDESTSPACE SEILIEGENSISP 
ACEIZUTSPAGEFVERLEIHEN. #"s RETURN 

261@ IF RR<>B OR Fi(6) GOTO 2a2a 

2611 PRINTYR{SPIENTSPACE SZHORNISPALEHWNTENDERTS. 

EACE STIIEREISPACEILASTISPACEIDASTSPÄACE SHIORT" 
2612 PRINT" {C#HEQUARZIC-} „ (SPAGEIWENNTSRACEISIEL 
SPACEHNICHT (SPACEI VOLLKOMMEN" 

2613 PRINT"DEMISPAGE SBI@SEMISPAGEIVERFALLENISPA 

CEISIND. $1Q=0+ 1ıFX (4) =1; RETURN 

2428 PRINT" {SSIELTSAHMERWEISELSPACEIENTH*LT{SPALCE 
IDASTSPALE SBILICHTSPAGEINLURTSPAGESYLEEREISPÄCE & 

SYEITEN. "sRETURN 

2630 IF 0X>S4 THEN PRINT" SDIAStSPACEI IST ISPAGEI 

MIRTSPADEILINMAGLTCHTSPACEHZULSFPALEILESEN. * 

2648 IF 0%t0,13<>-1 THEN FRINT"SDIUHSPACEIHASTE 
SPACE>KEINENISPACE SZIETTEL!"ıF%=1: RETURN 

2441 PRINT" {SAIUFISPACEIDEMISPACE SZIETTELTSPACE 
ISTEHEN{SPACEFINTSPACE IGRO_EN, {SAACEIGUNDU-" 

2642 PRINT"RISCHEN{SPACE SRIUNEN(SPAGEIDIETSPACE 
SHIDRTETSPACE + SFIRDTZLIG- SPACEIUND" 

2643 PRINT"ICH SPIATRITE-I. [SPACE SNIACHDEM{SPAC 

E SDYUCSPACEIDENISPACE SZIETTELTSPÄACEIGELESEN" 
2644 PRINT"HATTEST , tSPACEIVERBRANNTETSPACEFERLSP 

ACE+HZULSPACE  SAYSCHE. "30=0+1:0% 135, 1}=85 RETURN 

2677 REM #raak SAGE 

2798 IF v<>33 GOrU 2aRa 

2701 IF 0=® THEN PRINT" TSHHASTSPACEINILLSTISPACE 

ZDULSPAGCE SAGEN?" RETURN 

2782 IF RR<>S OR IX>& GOTD 2705 

27823 IF R%14,0)=8 THEN Q=@+2 

2724 RR=4:.G0T0 1208 

2705 IF 0%10,8)=3 AND 0X(0,B)<>RR 60TO 288 

2718 IF RR<>B OR 0<X>13 OR FXt7) GDTO 2728 

2711. Q=0+3: PRINT" {SDYASTSPACE SUINGEHEUERTSPACEI 

WIRDISPACEFPLETZLICHTSPACEY ZAHMCSPALEIUND" 

2712 PRINT"SCHAUTISPACEIDICHLSPALEIFREUNDLICHTSP 

ACEIAN. MEFXFI=S1I RETURN 

2728 IF RR<>14 GOTO 2730 

2721 IF 0=28 AND FXtis)=A GOTO 2B1BA 

2724 IF 10<>& AND IX<>13) OR FXt15) GOTO 2738 

2725 PRINT"SEIRTSPACEIGIBTLSPACEIDIRTSPACEHEINE 









































<175> 
<179> 
<42> 
sa5> 
xb7> 


“2ui> 
<131> 
<127> 
xAs> 
<107> 
<7d> 


<zB5> 
2122 
717 

<185> 


<175> 


<183> 


<140> 


x<255> 


xa2> 
s15> 


<174> 
<143> 


<177> 
<162> 
<56> 
<199> 
<a9> 
<227> 
<249> 
<129> 
<51> 


«212> 
x56> 


<79> 
«129> 
<108> 


<229> 
<192> 
«122> 
<255> 
<229> 
<230> 
<223> 
<234> 
<1B> 
<146> 
237 
<36> 
<59> 
<69> 
«124> 


<224> 


"a6 


67? 
<11> 
<&2> 





SPACE STIÄRNKAPPEISPACEILUINDISPACEISAGT: " 

2725 FRINT"{CH SHIIT{SPACEIIHRERISPACE, SHIILFEIS 
PACEISIEHSTISPACEIDLI{SFAGEIDIETSPAGE SHIELTESPAG 
EIMIT" 

2727 PRINT’DENISPAGE SAYUGENTSPACEIDERTSPACEIBES 
EN{SPACE SGIEISTER. (Cm }" 

2727 0%(21,1)=-13F2(19=16 0-94 RETURN 

2738 IF 0<>31 G0TO 2749 

2731 IF FX(18)<2 5010 28229 

2732 FAt18)=3:0=0+2:0% (0, 1)=B 

273% PRINT" {SEIR{SPACEHANTWORTET{SPACEIDIRTSPACE 
ILANGBAM: (SPACE C# SDILILSPACEIHAST,“ 

2734 PRINT"VIEL{SPACEIGELERNT , [SPACEIGEITISPACEI 
ICHTSPAGEIDICHTSPAGEI VERLASSEN" 

2735 PRINT"HARE. {SPACE SEINHRECSPACEIDANNTSPACEI 
MEINENTSPALE SAIUFTRAGCSPACEI ZU" 

2736 PRINT" 1SEINDETSPACEIUNDCSPACEITETETSPAGEIDE 
NISPACE SH}EXENMEISTER, (SPACEIDEN" 

2737 PRINT"DUNKLEN{SPACE SHIERRSCHERSFACEIDERES. 
PACE SB3@SEN. {C-3" 

2738 PRINT" CSDFANNESPAGEILEST (SPACEIERTSPACEISIC 
HISPACEHINISPACE SLIUFTISPACEIAUF LSPALEMINDESPAC 
EILA_T" 

2739 PRINT®EINEN{SPACE SZIETTELTSPACEIZUR\CK. "40 
%136,1)=17r RETURN 

27a@ IF RR<>1F DR 0<4B OR FXIZW>B GOTD 2760 
2741 Q=0+4:F% (20) =1 

2742 PRINT" (SPIL@TZLICHTSPACEIERSTARRENTSPACEIDI 
EiSPACE 32) \GEISPALEIDESTSPACEIBESEN" 

2743 PRINT" CSH}HEXENMEISTERS. (SPACE SEIRLSPACEIST. 
HEINT SPACE FNUNTSPACEIWEHR-" 

2734 PRINT"LOS. « „RETURN 

2768 IF 0=41 AND F#t28)<2 THEN T=12:6070 ımmaa 
276 IF 0=41 S0TD 25008 

2798 PRINT"ISDIEINESPACE SAHUSSPRUCHTSPACEIHATES. 






































: PACEIKEINETSPACEYERSICHTL ICHELSPACEI SFIOLGE. "sR 





ETURN 

27997 REM u##4# KARTE 

2088 IF V<>35 BOTO 2988 

25893 PRINT"{SBIIEISPACE SZIEITISPACEIVERRINNT."r 
RETURN 

2599 REM sus## STIRB/SCHWIMME 

2700 IF v=37 THEN T=2:G60T0 18009 

29979 REM »##4# TOETE 

saaa IF V<>39 GOTO 3108 

suBı IF ü=B THEN PRINT" (SWIENTSFACEHWIILLSTISPACE 
3DUISPACEITETEN?"LFFZ=12RETLURN 

SsßB2 IF 0%10,@<>3 THEN PRINT" {SDYHINBETSPACEIKAN 
N SSABEPNAEIESTESERNIEHTTREBERETWIERETSFERTERBETN 











a IF 01=8 THEN PRINT" tSPIUCHTSPACEINICHTISPAR 
EIMIT{SPACEIDENTSPAGEIBLO_ENISPACE SHITNDENTFIFF 
%=1sRETURN 

Sa@s IF 0%01,1)6>-1 THEN FRINT"ISDIIESETSPACE 5 
HHAFFETSPAGEIBESITZTLSPACEIDULSPACEINICHT A FFR= 
11 RETURN 

SPIB IF 0<>8 BOTO 3928 

Salt IF D1X>7 THEN T=4:6070 1aaaa 

3B13 IF FXt4) THEN PRINT"ISDIERISPACE SHIANNISPA 
GEIISTISPACEFSCHINLSPACEITOT "RETURN 

IQ14 FX A) =17F%1)=B:=ed+s 

3Q15 FRINT“ CSHIITISPACEIEINEMCSPACEIGEWALTIGENTS 
PACE, SSICHLAGISPAGEIINSISPALE SHIERZ" 

3216 PRINT"HASTTSPACEIDULSPACEITHNISPACEHTRDL.ICH 
LSPAGEIVERWUNDET. "s RETURN 

3@2@ IF 0=11 THEN T=3:ıG0T0 1PaB4 

3022 IF 0=18 THEN T=91G0TD 19208 
5824 IF 0=28 THEN PRINT" {SW3ARUMLSFACEIWILLSTISE 
ACEIDULSPACEISDETWASTSPACEFTLIN?" RETURN 

3025 1F 01<>1 THEN PRINT"ISDIIESEISPACE SHYAFFEL 
SPALEIISTLSPACEFSINNLOS!® Es FFX=1 RETURN 

30354 IF 0<>29 GOTO 3048 

3951 IF 0%<0,1)<>RR THEN PRINT“ SM} IERTSPACEHTST 
KSPACEIKEINTSPACE SCHEIST. "ıRETURN 

3432 0%10,19=Bı FA t1637=2:0%121, Biber RK RR, 1 
I=1& 

3033 PRINT" {SKI IT{SPACE? EINEMISPAGEFKRAFTVOLLENE 
SPACE SSICHLABSCSPACEIMITSSPACKIDEM”" 

3034 PRINT" (SSICHWERTELSPACEIHASTCSPAGEIDUNSPACE 
IDENISPACE SGIEISTTSPAGEIGETETET." 

3035 PRINT" ISDIIEISPACE STHARNKAPPELSPACEIUNDTSR 
ACEIDIEXSPACE SAIBERRESTESPALEIDES" 

3@S6 PRINT" SGIESPENSTESTSPACEFZERFIELENTSPACEHZ 
UISPAZE SSITAUB." 

3837 PRINT“{SHHUNTSPACEIISTISPALEIDERTSPACE SWIE 
GISPACEIFREIISPACEINACHTSPACE SNITHRDEN. "RETURN 






































Sompute mib 


<236> 


<55> 
<34> 
<145> 


<171> 


<114> 
<18B> 
<139> 
<179> 


<79> 
<90> 
<139> 


<125> 
<208> 
<182> 
9, 
<a4> 


234? 


«1433 


<202> 


<ımi> 
<1489> 
<151> 


<135> 
<127> 


<a4> 
<111> 


<179> 
«14> 


'<10> 


<23517 
<80> 


<138> 
S234> 
<195> 
S1ä6> 
<25>. 

<185> 


<77> 


5/87 


5/87 


3938 IF 0<>42 OR FA(2B)=2 60TD 3849 

3241 IF F%t24)=9 THEN T>13:G60T0 10048 

5242 FX(21}=e13F%128)=210=0+2 

3a43 FRINT" {SAYUSISPACEIDEMISPALE SLIEICHNAMISPA 
GEIDES {SPACE ISCHRECKL.ICHSTEN" 

3244 FRINT"ISGIESCHEPFISPAGEIDERTSPACE SEIRDEISP 
ACEISTEIBT (SPAGEIEINTSPACEIBESTIALISCH" 

53945 PRINT"RIECHENDERISPACE SDIAMPF{SPACEIAUF.” 
Sa45 PRINT” ISDIULSPACEFHERSTISPATEIEINTSPACEILAU 
TESISPACE SKIRACHEN{SPAGEHINDISPACE SB>RECHEN: "3 
3047 PRINTF"DIELSPATEIDBERENTSPACE SCHEWELBEISPAC 
EIVDNLSPACE SMIINASTSPACE SGILUNDUR" 

504A PRINT"ST\RZEN{SPALEIEIN! "RETURN 

3897 REM #x= ENTZUENDE 

31908 IF Vv<>41 GOTD 3288 

3181 IF 0%210,13<>-i THEN PRINT" TSDIASTSPALE>HABE 
SPACE ICHTSPACEINICHT" ıRETURN 

Ssıa2. IF D=15 THEN: T=17:60T0 12208 

3158 IF RR<{>1B OR F%(71<3 THEN PRINT" ISIICHTSPAR 
EIHABEISPAGEIKEINTZPACE SFIEUER!"SRETURN 

3151 IF 0<>14 THEN PRINT"{ISDIABSTSPACEIHATISPÄRE 
KEINEN{SFPACEHALZUTSPACEIGRÜ_ENISPACE SSYHINN. "ARE 
TURN 

3152 IF FXt13) THEN R=D-4 

S1S5I Qeir4:F XL PelaPRINT"ISDIERTSPACE SAIBTISPA 
CEIBRENNT {SPACEHLICHTERLON. "ıF% 110) =Sı RETURN 
3208 IF V=-44 AND 0D=14 THEN PRINF*{SDILWKSPACEIWIR 
FSTISPACEIIHNISPAGEIWEG. "10% (0, 13=D 

33@8 IF V<e>44 GOTO FARB 

3581 IF 0<>21 THEN PRINT"{SDYIASTSPACEIKANNSTISPA 
TEIDULSPACEIICHLSPACEINITECHTTSPALEIAUFSETZEN!":RE 
TURN 

33802 IF 0%(0,13<>-1 THEN PRINT" TSPIUTSPALEIHASTT 
SPACEFKEINEISFACE SKIAPPE. "RETURN 

3310 FX ILS) EIHPRINT" ESDILICSPACEI HASTTSPACEINUNTS. 
PACEIDIELSPALE STIARNKAFFEISPALEIAUF.® 

3311 IF RR=15 THEN PRINT*TSDIUIISPACEIERBLICKTISP 
ACEIEINENTSPACE SGYHEIST!* 

3312 0=9+430% 10, 1)=-2: RETURN 

3498 IF (V=49 OR Va54}’ AND Di=B THEN PRINT"TSHIQ 
MIT?"sRETURN 

34190 IF V-47 AND Di<>i GOTO 3925 

3508 : 

4998 » 

49391 REM BHHHRSRHRHREHAHRHRHRAHHH 

4972 REM RAUM-BEFEHLE AUFRUFEN 

4993 REN HH RHEIN 

SaQua F=R:605SUB SBOABR+1DAHRR 

Saul IF F THEN PRINT”{SDIASTSFALEIGEHTISPAZEINIC 
HT. "22G0=Z6-1 

5202 FFZ=F:RETURN 

5970 REN ER ARARRHHEHHREIREHHH 

5971 REM ACTION 

5992 REM RR ETHIÄ - 

aan 19, 7214) GOTO 5288 

&292 IF RR<>4 GOTO H1AA 

sau FXAWI=FAID)+L 

suıa IF A=1 OR A=2 THEN PRINT”TDOHH SYIHONTSPADE}I 
UNTEN TSPACE}HERSTISFACEIDUISPACE SHIENSCHENSTIMM 
EN. “ 

&R2Q IF A=3 THEN PRINT”Y{DOHN SEFINTSPÄGE SHIANNT 
SPACEITAUCHTISPALE? PLATZ ICHTSPALEF AUF. {SPACE SE, 
IRISPACEIIST"IRXIA,5)=U 

5930 IF A=3 THEN PRINT" WAHRSCHEINLICHTSPACEIDERT 
SPACE. SHIERRISPACEIDESISPACE SBIAUMHAUSES. "10218 
‚1)=4 

6248 IF A=4 THEN PRINT"CDORN SPIERTSPACE SHIANNT 
SRAGEFGREIFTISFACEIDICHTSPALEIAN!® 

sR5Q IF A=5 THEN Tri:GDTG 19088 

s1Qd IF RR=S AND FXi1) THEN T=1ıG0T0 190008 

11a IF RR=F AND FXtR). THEN FAlZI=SSI FR FI I: DI 
‚1r=3 s 

6128 IF RR=3 AND FA THEN PRINT"TISEIINISPAEE S 
HIANN{SPACEIGREIFT{SPACEIDICHTSPALEIAN! "SF CHI 1 







































































6200 17 FXil) AND FA(ZI<>RR THEN TeFZiS):G0T0 19 
aan 

6210 IF: RRS>B AND Fria)=4 THEN FXiBI"S 

6300 IF RR<>E OR FXI7) GOTD 6400 

6310 FRCRRISFRIRRI+LLA=FZRR) 

6320 IF A=2 THEN FRINT"{SEIINESPAGE SSHEEUNGEHEU 
ERISPAGCENTAUCHTLSPACEIALISCSPAGEFDEMISPACE SSIEEL 
SPACESIAUF! "0X (11,1)=B 

6330 IF A=3 THEN PRINT" TSDIASTSPACE SUNNGEHEUERT 
SRACEYSCHAUT{SPACEIDICHTSRALEIZURNIBTSPACEHAN. * 
6340 IF A=4 THEN PRINT" {SDIASTSPACE SUFNGEHEUERT 











<37> 
<35> 
<127 
<2327> 


<827 
«29? 


<30> 
«24> 
<160> 
x51> 
<i11> 


<165> 
<231> 


<218> 
*757 

<248> 
2403 
«22977 
<103> 


<26> 


17773 


<&5> 


<171> 
<119> 


<a7> 
<149> 
<245> 
«2057 
<B7> 
47 
<89> 
<38> 


x47)> 
<ah> 
<ab> 
<17> 
<sB8> 
<202> 
«63> 
<2aR3> 


<36> 
x241> 


<b9> 
<76> 
x92> 
«i1> 


“241> 


<201> 
«126? 
“2284> 
<181> 
<&oB> 
x54> 


<94> 


Programme 


SPALEIGREIFT{SPACEIDICHTSFAGEIAN?® 
6350 IF A=5 THEN T=4160T0 19008 

6428 IF RR<>IB GOTO asaıa 

641 FZLNSFRLIHLEASFRLN 

6428 IF A=1 THEN PRINF"{SEIINCSPACE SUINWETTERTE 
PACEIZIEHTISPAGEIAUF. 

6438 IF #=2 OR A=4 THEN PRINT" ISEISCSPACEIREBNET 
XSPACEHIN{SPACE SSYTRAMEN. * 

#940 IF A=3 THEN PRINT"LSEIINISPACE SBILITZISPAC 
EISCHLSTISPACEIINTSPACEIEINENTSPACE SBIAUMISPAC 
E}IN{SPACEIDER" 

6444 IF A=3 THEN PRINT"{SNITHEISPALCEIEIN, {SPACE} 
DER{SPAGEIGOFORTASPACEIANF"NBT SPAGEIZUTSPACEI BR 
ENNEN?! "5 

6458 IF A=5 THEN T=7:G0T0 19098 

s50B IF FXt10)=2 GOTO 6708 . 
ER FRDISFRIIN -LIA=SFRI1O) 

&51R IF AC2 THEN PRINT" {SDYASESPACE SLIICHTISPAC 
EIDESTSPACE SAISTESTSPACEINIMMTISPACEIAB. * 

&520 IF A=8 THEN PRINT" (UPI" TAB (28) 5" „LSPACEIUN 
DISPAGEIER-{SPACEZHLISCHT. 10%114,1)=B 

6330 IF A>9 AND FX(II)=A BOTO 6700 

6708 IF RR=15 AND 0%121,1)=-2 THEN 0%128,19=15 
6588 IF RR<>IS OR FXt16)=2 GOTO 4900 

6018 A=FZtL7)+ 

#820 IF A=2 AND FXti6)=B THEN PRINT" ISDIUTSPACEI 
FNHLSTCSPACEIDICHTSPACEIBEDBACHTET. su" 

#838 IF A=4 THEN TeiMıGDTD 19008 

640 FXLATI=A 

69MR IF R%(16,19=17 THEN Rstis)erp" 

6F1B IF FXUUB)=2 THEN R6(17)=0M" 

7eR® IF RR<>B THEN FALUNBIGOTD 7108 

7A1B A-FZiATI+1 

7828 IF A=1 THEN PRINT" SDILULSPACEIBEMERKATTSPAL 
EIEIN{SPACE SGIRUPPE{SPACE SSIOLDATEN, SPACEIDIE 
L 


7021 IF A=1 THEN PRINT"AUFISPACEIDICHTSPACEHAUFM 
ERKSAMISFACEFWIRD, ® 

7058 IF A=2 THEN PRINT"{ISDIHIETISPACE SSYIOLDATENM{S 
PACEIGREIFENTSPALEIDICHISPAGEFAN!" 

7@a4B IF A=3 THEN T=11150T0 190 

7959 Fit1Ne=A 

71AB IF FXi2M)=@ EOTO 9959 

7118 FXtZU)=F2210)+1 

7124 IF FX121)=3 THEN T=14:6DT0 19908 
































737970 RETURN 

99971 Er 2 - 

9932 RE ERHEBT IHN 
7993 REM TODESMELDLNGEN 


III REM SER HERR KENN 

1BB0B PRINTFECLEAR DEAN?" 

10218 GOSUB 1B97UA+T*10B. 

12073 GOEUB 2510 

IB1BB PRINT" ISHI@CHTAST ISPAGEIAH SPACE NDCHESPAG 
E3EINMALTSPALEIVON{SPACE SYVIÜRNETSPAGEFAN-" 
18118 PRINT"FANGEN{SPACEF LJZ/NITF", 

18128 GET A$ 

19138 IF As="J” THEN CLR:B=1:G0T0 40802 

18149 IF As<C>"'N" GOTO 18128 

12158 POKE 532B94,14:POKE 53281 ,4: PRINT" ICLEAR> 5 
£16.BEUVEY"SSEND 

19168 ı 

11@D4 Z$="D":GOSUB SDens 

11B1R PRINT"ERTSPACE SHIANN{SPALEIBETRACHTETEISP 
ACEIDICHTSPACEIALSTSPACE SDITEBISPACENND" 

1192@ PRINT"UNDI{SPACEIT@TETETSPACEIDICHTSPÄCEIGR 
AUSAM. PIRETURN 7 

j110n z$=-"A'ıGOSUB 5000D 

11118 FRINT"ULSLSPALE SYHERZWEIFLUNGTSPAGEINBERTE 
PATEIDEINECSPACEISCHLECHTE" 

11120 PRINT"{SLIAGETSPAGEIHASTISPAGCEIDUISFACE SZ 
JELBSTMORDISPACEIVER\BT. "ERETURN 

11280 Z$="| "ıGOSUB 5BRaB 

11218 PRINT"EIDERISPATEIFOLGTETSPACEIDIRTSPACEID 
ERISPACE SHIANNISPACEIEILIGISPACEHIND" 

11220 PRINT"BRACHTELSFAGEIDICHTSPACEIMITISPAGEIS 
EINEMISPALCE SSICHWERTISPACENIM. "IRETURN 

11384 ZI="T" 

11318 PRINT“ <STYROTZISPACE SGHEGENWEHRTSPACEIKON 
NTESTISPACEIDUTSPALEIDASTSPAGE SUINHEILLT — 

11328 PRINT"NICHTISPACEIMEHR CSPACEIVONTSPACEIDIR 
{SPACEIABWENDEN. „ „ "RETURN 

11499 ZI="KrıG0suUB SAAB . 

114318 PRINT"URZ TSPACEINACHBEMISPACEIDLI {SPACE} DEN 
{SPACE SSYEETSPACE}BETRETEN ISPACEFHAST," 

11420 | PRINT"SRIFFENISPACEIDICHISPACE, SPIIRANHAST 























Gompute mib 


<148> 
«1777 
<133> 
x24>2 


<149> 
<a8> 


<242> 


<231> 
<3m> 

<103> 
<249>7 


x19> 


«2247 
“1847 
s224> 
<111> 
s9a> 


<161> 
«2127 
<1291> 
<108> 
<196> 
«1773 
<49> 


<32> 
897 


<174> 
x1727 
<184> 
x116> 
x37> 

2457 
<187> 
x104> 
«24433 
*13&>7 
*246> 
<77> 

<a4> 

<213> 


<70> 
<242> 
<b2> 
<198> 
<188> 
<229> 
<17> 
32337 
xD> 


<iö> 
«B3> 


<ır1> 


*210> 
s238> 


2373 


<249> 
<o> 


<15> 


<58>r 
<178> 


«138> 









































Programme 


SPATEFANTSPAGEIUNDTSPACEINABTEN" 

11439 PRINT"DICH{S PACEIBISTSPAGEIAUFTSPACEIDENTS. 
PATEILETZTENISPACE SKINDCHENTSPACEIAB. "RETURN 
11528 Z6="M":G0SuH SBORD 

11518 FRINT"ITISPACEISEINEMTSPATEIRIESIGENTSPALCE 
SKHIEFERCSFACE} BRACHLSPACEIDAS" 

11522 PRINT" {SS3 EEUNGEHEUER{SPALEIDIRTSPÄCEIDASE 
SPALE, SGIENICK. "RETURN . 























11808 Z$="K"sG0SUB SORRA 


11618 PRINT“AUMLSPAGEIHASTESPACEIDULSPALEIDICHTS. 
PACEIVON{SPACEIDEMISPACE SSICHRECK" 

11628 PRINT"DESCSPACE SEILITZEINSCHLAGES CSPACEFE 
RHOLT +{SPACEITRAF® 

‚11530 PRINT"DER{SPACEINCHSTEISPACE SBILITZISPAC 
EIDICH, "RETURN 

11798 Z$="T":GOSUB SuHOn 

1171@ PRINT"N{SPACEIDERISPACE SDYUNKELHEIT, (SPAC 
EIMARTSPALEHESCSFALEIMIRLSPACEFUNMEGL ICH" 5 

11728 PRINT"ETWASTSPACEITULSPACEISEHEN, (SPACEIST 
ON.PERTE , [SPACEIFIEL CSPALEIHINLSPACEFUND" 

11738 PRINT" TRAF (SRACEIUNGLNCKLICHERWEISETSPACEI 
MIT{SFACEIDEMLSPACE SKIDPF" 

11748 PRINT"T@TLICHTSPACEFAUF "RETURN 

11820 Z$="1"1G0OSUB S2ROR. 

11810 PRINT”EBERRASCHT {SPACEIVONTSPALEIDEINEMISP 
ACE SAINGRIFF , {SPACEFISCHLUG" 

11828 PRINT"DER{SPACE SHICHTERTSPAGEIDIRTSPACEI 
DEINE{SPACE SHIAFFEISPACEIALUS{SPACEIDER" 

11858 PRINT" CSHIANDESPÄCEILUNDISPÄCEHTATETE SPACE 
>DICH. "RETURN 

11908 Z$="A";BOSUB SDABB 

11918 PRINT"YUFTSPACEHEINMALTSPACEIVERSPARTESTISR 
ACEFDLIESPACESEINENISPACE SSITICH" 

11720 PRINT"IMTSPALE SHIERZENTSPACEIUND{SPACEIST 
ARBSTCSPABEIUINTERTSPALEIE LNEM" 

11938 PRINT"BRSENISPACE SLIACHEN, (SPACEIDESSENIS 
PACE SUIRHEBERTSPACEFDIRLSPACEIFNR" 

11940 FRENT" IMMERTSPACEIUNBEKANNTLSPACEHBLEIBENT 
SPACEIWIRD. "RETURN 

120989 Z$="D"1G0SUB SMROB 

12018 PRINF"IETSPACE SBIARKI ,SPACEIDIETSPACEIDU 
NKLENTSPACE SD} IENERTSPACE SGIARKORS, “ 

12820 PRINT"WARENISPACEILEIDERCSPACE) INLSPACEIDE 



































‚RISPAGE SAFBERZAHL „ TSPACEFNAHMEN" 
:1283@ Pi PRINT"DICHLSPACE}FESTTSPACEIUNDESPAGC: ACEYFOLT 


ERTENTSPACEIDICHLSPACE ERAUSAN" 

12040 PRINT"ZULSPACE STIODE. "RETURN - 

12100 PRINT" {4P27 "1 26="1"1GOSUB SURGR 

1211@ PRINT"RPLETZLICHTSPACEIWIRDESTLSPACEIDUTGR 
ACE) INSSPACEIDEINESPACE SHIEIMAT-" 

12128 PRINT"STADTISPACE}ZUR\CKGESETZT. SPACE SW 
EIL{SPACEIDUTSPACEFKÜRZISPACEI VOR" 

12130 PRINT"DEM{SPAGE S2I IELTSFACFFAUFBEGEBENTSP 
ACEHUNDISPACE SGIHARKORLSPACEINICHT" 

12148 PRINT"GET@TET{SPALEIHAST , SPACEIWURDEST{SE 
ACEIDULSPACEIVOMISPACE SVIOLKE” 

12158 PRINT"GEI.YNCHT. {SPACE SDIEINTSPACE SMIAMEL 
SPACE) WARTSPACEILANGETSPACEHEIN 

12168 PRINT"SCHLIMMESTSPACE SSICHIMPFWORT. "aRETU 
RN 

12208 ZI="F":GOSIUB SAnaR 

12218 PRINT"REHLICHLSPACEISPRACHTSPAGEIDERLSPACE 
FSCHRECKLICHE” 

17220 PRINT" CSHHERRSCHERLSPACEFEINTSPACE SWIORTE 
SPACEIDESCSPACE SGIRAUENS, CSPAGEIDESBEN" 

12258 PRINT"TSKIRAFTISPAGEIAUSREICHTELSPACEIDICH 
LSPALEHAMCSPACEILEBENDIGEN" - 

12248 PRINT"UNTER (SPACE FÜNVORSTELLBARENISPACE 58 
ICHMERZENTSPADET ZU" 

12252 PRINT"VERBRENNEN. "RETURN 

12508 Z4="U"TGOSUB 5OBOB 

12518 PRINT"NTERTSPACEILAUTEMISPACE, SGIETABELSPA 























12320 PRINT "\BER{SPAGEIDIRTSPACEIEEN. {SPACE SEIS 
XSPACHIBABTSPACEIKEINENISPACE SA)USWEG, 

12358 PRINT"WOHINTSPACEFHDULCSPACE}DICHTSPALEIHTTT 
ESTISPACEIRETFTENTSPACEF KENNEN. "3 RETURN 

1240D Z$="D".505LUB Saneu 

42418 PRINT"ERISPACE S#ICHTERTSPACEIMI_ VERSTAND 
tSPACEIDIETSPACE SHIAFFE" 

12428 PRINT"ALSISPACE SHFORDDROHUNGB. "RETURN 
12502 7$="G"1GDSUB Sana 

1251M PRINT"RO_ERISPACE SSICHMERZISPACEIDURCHZUC 
KT{SPACEIDEINENISPACE SKIERFER"z 

125208 FRENT"UNDESPACE) DULSPACEISTIRBSTTSPACEIAME 
SPAGFIGIFTIGEN SPACE SWIASSERTSPACEIDEB 


























<157> : 
<215> 


322. 
<b> 


x32>. 
<123> 


«253> 


<135>? 


«245> ' 


<213> 
<b> 
<209> 
<> 
«187 
«11B> 
<1978> 
777 


<200> 
<118> 


<ı109> 
<31> 
<27> 


<117> 
<233> 


<125> 
<93> 
<206> 
<244> 
<153> 
<220> 
“2133 
x3> 
«255> 
<77> 


<235>. 
<108> 


<48> 


<997 

<169> 
<212> 
<ı05> 
<ioda> 
<1a4> 
«<228> 


<113> 
<123> 


<42> 

<1B5> 
<238> 
<139> 


<ı1B> 





12538 PRINT" {SZIRUNNENS. ":RETURN 

12508 Z$="L":GOSUR SRERBIPRINT"AUTSTARKISPAGEIZE 
RBARST{SPALEIDIETSPACEHUNHEILVOLLE*” 

12614 PRINT” (SEIAMPETSPACEIUNDCSPACEHNITSPACEIMI 
T{SPAGEF IHR. {SPAGE SKIAHRSCHEINLICH" 

12628 PRINT"HATISRAGEIEINISPACE SDYIENERISPACE & 
GIARKORBISPACE SSIPRENGSTOFF” 

12438 PRINT"HINEINBETAN. "RETURN 

19002 PRINT" (CSDHRACKESPACEIEINETSPACE STIASTE) 
» 

19218 FOKE 199,2:WAIT 198,1:6ET A$ı50T70 10002 
ZUaBD D%.15,19=. PRINT" SDIERTSFALE SHINCHTERTSPA 
CEISCHAUT TSPAGEIESTEPACEFANTSPAGEIUNDCSPACEILI_T 
tSPACE>DICH" 

22019 PRINT"MITISPACEIDEMISPACE SSICHWERTISPACE) 
NACHTSPACE SNIHORDEN{SPACEFDEUTEND" 

20020 PRINT"GENEN. (SPACE SEIRTSPACEISABTISPACEIE 
RISPACEHBEH"TLTCSPACEIDEINISPACE SEIUCH“ 

ZOBSD PRINT"BISTSPACEIZULSPALEIDEINERLSPACE ERIN 
CKKEHR, 

ZOBI8 B=E43:RK 112, 1I=1FıRETURN 

ZU1BG PRINT” ISDIERTSPACE SWIEIBECSPALEISAGT SPAR 
E} ZULSPACEIDIR: {SPACE £# SAILSCSPACEINOCHLSPACEN 
50 „ 

2a11M PRINT" JUNGTSPACEFWARTSPACEIWIETSPAGEIDUN CS 
PACEIK”MPFTECSPACEIICHTSPAGEI ÄUCHTSPACEIGEGEN". 
ZMI22 PRINT"DAS{SPACE SBIGBE. {SPACE SHIEUTELSPAC 
EIJEDOCHTSPACEIFEHLTSPAGEIMIRCSPACEIDIE" 

20130 PRINT" SKIRAFTLSPACEIDAZU. SPACE SDIUOCHTSP 
ACE}IBEWEISELSPALEIMIRLSPACEIERST „ CSPACE>DAS" 
20140 PRINT"DUCSPACEIEINTSPALE SZHALUBERLEHRLINGT 
SPACEIBIST „ CSPACEFUND{SPALCEI ICHLSPAGEIDIR" 

2at5M PRINT"VERTRALIENTSPACEIKANN. (6-3 * 

2B19N B=Q+ZıFX (14) =1aRETLRN 

20208 PRINT" (SDIERTSFÄCEIWEISELSPACE SZIAUBERMEX 


















































' STERISPACEISCHAUTLSPACEIDICH" 


282180 PRINT"ERHARTUNGSVIHLLSPACEIAN. ISPACE SEIRT 
SPALCEISCHEINT {SPACE} IRGENTWIE" 

29222 PRINT"GEISTIG{SPACEIGEFESSELT, "ERETURN 
20979 u 

210080 PRINT" {SP}) ISKETFETSPAGEINDERTSPALEF TISCH 
IASSETTELSPACE EB LEFTI"g 

2iA1R GET G4s IF G$="D" OR 6$="C" THEN PRINTGS:RE 

















TURN 

21028 GOTG 21018 

21838 z 

25820 I=R+1@:PÜKE 53280, Gı POKE 53281 ,@:C1=9 
25A10 PRINT" IBROHN CLEAR DOHNS ORANGE)" STABtISIE 
25020 FOR I=1 TD 4126=MID* ("SIEG",I,1}3G0SUB 590 
BB:NEXT 
25B3@ PRINF 
25040 PRINT TABt17SI7 

25058 ZI=4M"LGOSUR SERBE 

2568 PRINT"INASTSPAGEF"E 

25079 Z4="R":BOSUB SERRB 

25088 PRINT"UNDUR" 

2599@ PRINTTAR (95) KTISTISPALEIGELEET!“ 

25108 PRINTTAB{127)3 

25118 Z$="H"a1GDSUB 52a08 

25129 FRINT"ERZLICHENTSPACEI"F 

25138 Zi="G"1GOSUB 5QBAR 

25140 PRINT“L\CKWUNSCH! " 

25200 L#(1d="(SMI INASISPACE SCHUNDURTSFAGEIVONES. 
PAGE SPIHILIPPISPACE SKICHNISPACEI-ASPACE SSIIEC 
SPALEIERHI“ 

25218 L$(1I=L$(1)+ELTEN"+STRE ID 4 CSPACEI VON" FB 
TR$ {PM} +" {SPACEIMEBLICHENTSPACE SPIUNKTEN" 

25220 L$(2)="ISPACEI- SPACE SVIIELENISPACE SDIAN 
KISPACEIFNRISPACE STIEBTENTSPALEIUNDISPACE SKIRI 
TISIERENISPACEFANTSPACEI" 

25256 L$13)="SRIALFHISPACEILINDESPACE SCHHRISTIN 
EiSPACE SEIGELSEER,CSPAGE SAHNNETTEISPACE SKHEHN 
stSPAGE SEIHRISTOPHLSPAGEN" 

25240 1.83) =L5 (3) +" 533 TEINEBRUNNERTSFACEFUNDTSP 
ACE STIHOMASISPACE SH3OLZMANNTSPACEI-SPACEI" 
25250 1.614) =“ {SDIANKTSPACLEI AUCHLSPACEIFNR SPACE} 
DEN{SPACE SKIURSCSPACEFIMISPACEIBA "ERLSPACE SS}0 
NDERHEFTSFÄGEFANESPACE SHFICHAELESPACE SNIICKLE 
SISPACEI- SPACE” 

25248 L$(5)=" CSDIEMN“CHST{SPAGEIAUFISPACEIDIESEM 
{SPACE SSIDREEN: (SPACE SHIINAS{SPACE SCHINDURLSR 
BCE S-2 SPACE -KSPÄCEI" 

25278 L$16)="{SEIRDACHTLSPACEIUINDISPAGE SPIROERA 
NNIERTCSRACEY IMTSPACE SYIAHREISPAGEIDESTSPACE SH 
JER“ 

25208 L$(7I="RNISPACEILFBSTSPACEIINCSBACE SEIRLA 
























































Sompute mib 


<«152> 
<133> 
<226> 


133> 
<B2> 


<218> 
297 
<120> 
*177> 
<42> 
Las? 
“1553 
x147> 
<&8> 
<231>: 
<197> 
<27> 
<51> 
<92r7 
Ss217>7 
<137> 
«181? 
<1477> 
<777 
s38> 
s195> 
<178> 
<ı1F4> 
275 
<7B> 
<192> 
<17> 
<67> 
<1141> 
a7? 
<13> 
«19 > 
<789> 
<ın3? 
“31? 
<118> 
«1677 
<129> 


<127> 


<21> 


<F> 


<B> 


<2R0r 


«<122> 


<4> 


5/87 


5/87 


NGEN, SPACE, SEIRANKEN, {SPACE SDYEUTSCHLAND" 
252372 rer = 

25295 Kaßı Yy=i 

25sa2 I=i 

255 LS=SLFCXı+LEtY 

253302 IF I>LENELFECKII THEN X=tX+H1) AND F7ıy=tY+l) 
&ND 716070 25308 

25385 FOR J=1 TO Si NEXT 

2531B PRINT"tHAONWE DOWN22 SRACE}Y"ZMIDSELS,IT,57I," 
{SPACEI" i 

25328 I=I+1:6DTO 25301 

Z7Q0B END 

Sparta FR 

ZUD1IB REM ram IE 

30322 REM RAUH-AKTIUONEN 

SaUID REM eu ER EFUNEENHN 

SsBıaB IF V<>23 BOTO 30199 

salmı IF «0O<>2 AND <>) DR 0%15,1I)<?A GOTO 3011 
1.) 





3B1@2 PRINT" CSIYNISFACEIDERCSPACE SSHCHUBLADEISP 
ACEILIEGT{SPACEFEINZIGLSPACEHEINCSPACEIALTESISPA 





CE SBIUCH. "20%15, 13=1:@=Q+3: RETURN 

za11® IF IK>3 GOTO 70a 

S@12M IF RXt1,1}=2 THEN PRINT"{SD}IECSFACE STINR 
{SPACEI ISTISPACEIRCHONCSPACEIOFFEN. "= RETURN 
3@1SB RZ(1,1)=2: PRINT" {SS} IETSPACEIGINGISPACEIMI 





T{SPACEFEINEMISPALCEHLAUTEMISPACE SKINARRENISPALE 








?AUF. "rG=G+2: RETURN 
Ssa2oB ı 

Susen x 

3BaRa r 

Suse 
sasad = 

30708 F=1:RETURN 

SaBen IF 0<>iB GOTD 308618 

sasal IF V-38 OR v-48 THEN T=-5:60T0 10208 

Ssa8ıRa IF IVK>30 AND W224) OR D<e>11 OR FAtTIe. 6 
0T0 39824 





S@B11 PRINT"{SDIASTSPACEIZAHMETSPACE SUIRTIERTSP 





ACEIBRACHFE TSPACEIDICHTSPACENNBER{SPACEIDEN" 
350812 PRINT"ISSIEE. ISPACE SAYUFESFACEIDERTSPAGE? 
ANDERENISPACE SSIEITEISPALEISCHAUTEISPACEIES" 
SBal13 FRINT”DIEHTISPACEILIEBEVIHLL {SPATEFAN. "sRR=F 
:0=0+3:G0T0 1288 

Spa2a F=SlrRETURN 

S@9@BD F=1:RETURN > 

Si22Q IF V=38 AND 0=25 THEN RR=11:50T0 129R 
3121@ F=1: RETURN 

31198 F=1:RETURN 

sızaa IF Y<>4B GOTO 3150 

31291 IF RXt12,19<>0 THEN PRINT"{SEIRTSPAGCEILT_T 
tSPATEIDICHTSPATEISCHONTSPALEIDURCH! "RETURN 
31282 IF 0%(0,1)<>-1 THEN PRINT" SDIASISPACETHAS 
TISPACEFDUTSPACEINICHT ! "RETURN 

sı212 O=1 OR 0=7 THEN T=15:G60TD 103828 

51211 IF 0<>5 THEN PRINT"ISEIRISPACEIISTISPACEIN 
ICHT{SPACEIBEEINDRUCKT. " 

31212 PRINT" {SPIUTSPACEIGIBSTISPACEIESTSPACEI IHM 
“«+."ı1G0TD 28802 

313008 z 

31402 a 

S15RB F=1tRETURN 

Si4ämß IF v<>49 DR 0<>27 GOTO 31508 

31628 IF 0%411,1)<>-1 THEN PRINT" {SDYUTSPALCEIHAST 
ASPACEIKEINTSPALCE SSICHWERT." 

S1a584 IF R%I1A,1)>8 GOTO 31580 

51448 RZt15,19=1710=0+3:RR 115, 1)=17 

S145B PRINT" LSIWINTERTSPACEILAUTEMISPAGEF-CHTZENT 
SPACEIBRICHTXSPAGEIDIELSPACE STINR" 

S145B PRINT" ZUSAMMEN. "RETURN 

S17u2 IF V<>55 OR Ds UR (DIX>SB AND 01<>34) GD 
TOD 31758 

31718 IF 0%t0,1I<09-1 am 31628 

3172a IF FZt1B)=. THEN FZt1B)=1:Q=0+r5 

31738 PRINT" ISIIETZTISPALEILEUCHTETSPALEIALCHTS 
PACEIYDASISPACE SSICHRERTISPACEIVIG-" 

3174A PRINT"LETTISPACEFUND{SFACEISCHEINTISPACEIG 
EH“RTET. "ERETURN 

31758 IF V<>49 OR 0<>35 OR F%(18}>1 GOTO 31788 
31751 IF FXt1B8)=1 GOTO 31761 

31752 PRINT"ISDIAS{SPAGE SSICHWERT{SFACEIVERSPLI 
TERT{SPACEIBEIMISPACE SAYUFTREFFEN" 

31753 PRINT"AUFISPALEIDASTSPACEISCHWERE SPACE SE 
>ISENGITTER. ":D%t1i,1)=2: RETURN 

51781 PRINT"ISDIABISPACEIVIOLETTEISPACE SS}HCHWER 
TISPAGE+ZERSCHNEIDET {SPACEIDIE" 









































<128> 
<1?71> 
<145> 
<118> 


'x134> 


<74> 
«783 


<173> 
<B1? 
57? 
<22%> 
<94> 
<a1> 
<114> 
x89> 


“27> 


x223> 
<18> 


<213> 


<158> 
«147? 
<12> 
<112> 
<215> 
<x377 
<78> 
<117> 
<116> 


<24> 
«238> 
«2557 


s61> 
<197> 
<23> 
<öB> 
<134> 
<224> 
<13> 


<i> 


x16> 
<x31> 


x577 


<2uB> 
<248> 
<92> 
114? 
<3g> 


<229> 
«1837 
<82> 


«173? 
<207> 


<188> 
<777 

<161> 
<219> 
<251> 
<176> 
<«203> 
<175> 
<208> 


<1909> 


programme 


31762 PRINT" SEI ISENST"BELSPACEIWIELSPÄCE SBIUTT 
ER. {SPACE SHIITCSPACEIDEHISPACE SZIERSTE-" 

31763 PRINT"REN{SPALEIDERTSFACE SE? IBENSTBELSPA 
CE>ISTESPACEIAUCHTSPAGEIEINTSPACE SBIANN® 

31764 PRINT*AUFCSPACE SNIABDALARCSPACE>DUCHBRÜCH 
EN. ":Q=0+4 i 

31745 PRINT" TSEIRSTSPACEIJETZT SPACE) BEMERKSTS 
PACEIDU,ASPACEIDA_TSPACEIEINTSPAGE SSIPALTHSFRU 
8=2 

31766 PRINT" IN{SPACEIDERTSPACE. SHYORDWANDLSPACEI 
DESISPAGE, SRIAUMESTSPACE} IST. "iRZt17, LI=EIBERETUR 
N 

317688 IF V=&1 AND 0=34 THEN T=16:60T0 1gaa0 
31799 F=11RETURN 

31800 IF 0<>38 GR R%(18,2)=19 GOTO 31797 

31801 IF V=57 THEN O=0+i:8070 31828 

31902 IF V=49 AND Ol=i 5070 31818 

31883 60TG 31799 

Z181@ IF 0%14,19<>-1 THEN PRINT" CSHIABTISPACEIDU 
{SPACEINICHT. "sF%=1 9 RETURN 

31820 PRINT" {SH} INTERTSPACEIDEMISHIFTSPACE SOYE® 
FFNETENTSPACE SVYIORHANGBASPACEISEEHST" 

Z1EIB PRINT"DUTSPACEIOSTWÄRTSTSPAGCEIDENLSPACE ST. 
IHRONSAALLSPACE SGHARKORS. ":RZA(19,23=19:0=0+4:RE 
TURN 

Z1900 F=1:RETURN 





























48000 : , 
40010 REM uam HE 
4au20 REM RAUMBESCHRETIBLNGEN 


48030 REM RRHHRAHRAHBOHHARHHN 

ABLDB PRINT"UISPACEIBEFINDEST (SPACEIDICH{SPACEIT 
M{SPACE SHIAUSE SPACEIDEINES" 

48118 PRINT"GRO_EN{SPACE SLYEHRHEISTERE. {SPACE 5 
BIASLSPALE SHYAUSTSPALCEIIST" 

49120 PRINT"SCHLICHTTSFACEIEINGERICHTET. {SPACE 5 
IFN{SPACEYEINER{SPAGE SEICKE" 

40138 PRINT”STEHTISPACEIEINTSPACEHETWASTSPACEIGR 
®@_ERERISPACE STYISCH, TSPACEIDER” 

48148 PRINT" {SSYCHREIBTISCHISPACE SHIAGADALARS. T 
SPACE SAYN{SPACEIDERTSPACE SNIARD-" 

48150 PRINT"WANDTSPACEIDES{SPACE SHIAUSESTSPÄALCEI 
IST{ISPACEIEINEISPACE STINR. "s3RETURN 

422808 PRINT"ORISPACEIDIRTSPALEILTEGTISPACEIDERTS 
PACE SGHRÜ_EISPAGE SHIALDISPACE SEIUNDURS." 
48218 PRINT" {SEI INISPACEIKLEINER, tSPACEIUNSCHEIN 
BARER{SPACE SPYFADTSFALEHFNHRT" 

48228 PRINT"NORDRYRTSTSPAGEFHINEIN. ISPACE STIMIS 
PACE SSYNDENISPACEILIEBTISPAXEIDIE" 

48238 PRINT*ISHYNTFEISPACE SHIAGDALARS. "RETURN 
40308 PRINT"WISCHEN{SPACEIDENISPACE SBITUMENISPA 
GEITEILTISPACENSICHTSPACEIDER" 

48310 PRINT" {SPIFAD. {SPACE S\}BERISFACEIDIR,LSPA 
LEIHÜCHTSPACEI INTSPACEIDEN SPACE S6IE"ST, 12 

40328 PRINT"BEMERKSTSPACEIDUCSPADE > INTSPACEIDEN 
{SPATEIWSTENTSPACEIDERTSPACE SBITUME" 

AB3SB PRINT"YEINISPATEIKLEINES{SPAGE SBIAUMHAUS. T 
SPACE, SDIDISPACEIKANNST {SPACE }ABER” 

4054B PRINT"NICHTTSAAGEIHINAUFKLETTERN, * 

493580 IF F%(4) THEN PRINT"ISEIIN{SPAGEITOTERTSPA 
cE SMIANNESPACEILIEBT (SPACE AUF CSRACETDENCSPACE 
SB}IODEN, " 

AB36R RETURN 

48460 PRINT"ITISPACE SHYILFEISPACEIDESTSPACE 52} 
AUBERWORTES{SFACEIBISTESPACEIDUISPACEI IM" 

4841B PRINT" {SB3AUMHAUS. {SPACE SEISTSPACEHSCHEIN 
TESPACEIVONISPACE S4ITGERNISPACEIBE-" 

484280 PRINT"WOHNTTSPACEIGEWEBENTSPACEFZULSPACEIS 
EIN. "ı RETURN 

ABSBB PRINT"ANKISPACEIDES{SPÄACE SKIOMPASSESTSPAG 
EIKONNTEST {SPALEIDLITSPACEIDICHTSPACEIGUT" 

48518 PRINT"ORIENTIEREN, {SPACEFOBKROHLCSPACEIDERT 
SPACE SPIFADLSPACEIPLETZLECH" 

49520 PRINT"ENDETE. “RETURN 

4588 PRENT"LETZLICH{SFAGEIENDETETSPACEIDERCSPAC 
E SPIFADLSPACEIDURCHTSPAGEI DAS" 

AMLIB PRINT" ISGIESTR\PP, {SPACE SDIULSPACEIHASTLS, 
FACEIDIEISPACE SOIRIENTIERUNG" 

48528 PRINT "VERLOREN. "FRETURN 

Aa7aB PRINT"UFISPACEFEINEN{SPACE SHINGELTSPAGEIS 
TEHEND{SPACEFHASTISPACEIDUTSPACEIEINEN® 

40718 PRINT" {SNYBERBLICKTSPACEINBER(SPACHIDAS{SP 
"ACE SLYANDı ISPACE}IMESPACE SHIORDEN” 

0728 PRINT"ISTISPACEIEINISPALE SSYEE, TSPACE>BAL, 
DISPACEFDARAUFLSPACEFISTTSPACEIDERTSPÄCE SUIR-" 
40730 PRINT"WALDTSPACEY ZUENDE {SPALCEIUNDTSPATEIDA 
SISPACE SEHRO_EISPACE SSYEBIRGETSPACEIBE-" 





































































































CSompure mi 


<199> 
<161> 


<159> 


<1377 


<a5> 
<234> 
<158? 
<32> 
<186> 
<194> 
<136> 
x49> 
<«51> 
<187> 
353 
<22> 
x149> 
<54> 
<1497 
<179> 
“213> 
91? 
«1343 
<177> 
<186? 
<158> 
x203> 


«2387 
<185> 


<2B&> 
<I> 
<21> 
<x227> 
xB5> 
39? 
<211> 
<117> 
<140> 
<33> 
92? 


<179> 
<72> 


«222> 


<254> 
x23> 


<B> 

<243> 
«130> 
1293 
































44 


Programme 


48748 PRINT"GINNT. "RETURN 
4a082 PRINT" IN{SPACEIKLEINER{SPACE SDYSCHUNGELSE 
E{SPACE3VERSPERRT TSPAGEN IM" 

4aBid PRINT" CSHIORDENTSPALEIDENTSFACE SWIEG. (SPA 
CE SIYM{SPAGE SPISTENLSPALEHMDISAALE SWIESTENIS 
PACEFIST" 

49820 PRINT"BEHRISPACEIDICHTESTSPACE SGIESTR\PP, 
KSPACEIDURCHTSPACEFDASTSPACE) DU" 

a88358 PRINT"SICHERTSPAGCEINICHT CSPALEIBEHENTSPACE 
IKANNST." 

ABaAD IF F%i7) THEN PRINT*CSEIINTSAACEIFREUNDLIE 
HES{SPACE SSYEEWESENTSPATEISCHAUTISPACEIDICH" 
40845 1F FX17) THEN PRINT"LIEBEVOLLISPACEIAN, " 
AdHSq RETURN 

a07ad PRINT" TER, CSPACEIWOLSPACEIDABISPACE SSIEEW 
ESEN(SPACEIDICHLSFAGCETABGESETZT" _ 

48910 PRINT"HAT ,TSPACEIWIRDISPAGEIDERTSPACE SIR 
WALDTSPACEHLAÄNGSAMTSPACLEHLICHTER. " 

49928 PRINT" {SEISCSPAGEILIEGT{SPACEIVIELTSPACEIT 
ÜTESTSPAGE, SHIOLZISPACEIAUFLSPAGEIDEMISPACE SBI0 
DEN" 

40930 PRINT"HERLM. "RETURN 

41maB PRINTPOR{SPACEIDIRTSPAGEIRAGTISPACEIPLETZL. 
ICHtSPAGCEFEINESPACEIHOHEISPACE SFIELB-" 

41018 PRINT"WANDLSPACEIAUFTSPACEHUNDLSPAREIHHINDE 

RTLSPAGEIDICH{SPACEIWEITER SPACE) ZU" 

41828 PRINT "GEHEN. {SPACE SDIERTSRACE SUIRWALDESP 

ACEFISTISPACEI NTSPACEIENDE , {SPAGEINURSPACEINDOC 

H". 

41038 PRINT"VEREINZELTEISPACE SBINBCHETSPACEISIN 

DESPACEIAMISPACE SFIU_ELSPACEIDER" 

41049 PRINT" (SFIELSWAND. "3RETURN 

A1LIBA PRINT" INTSPACEIDLNKLERTSPACE SEIANBLSPACEI 
FAHRT CSPACEINOCHTSPACE SN3ORDEN. " 

4111B PRINT" ISLYBERTSPACEIPIRCSPACEISTREMTLSPACE 
: SLYICHT ISPACEI INTSPACEIDIELSPACE SFFINSTER-" 

41128 PRINT"NIS, tSPACEIDASTSPACE?RURCHTSPAGE SH} 
NSCHELSPALEIGED"MPFT (SPACEI WIRD. * 

A113B PRINT CSHI"TTEISPACEHICHESPACEHKEINSPACEI 
EIGENES{SPACE SLHICHT , TSPACEIKENNTE" 

41148 PRINT" ICHLSPACEINIEHTSTSPACENSEHEN. "<RETUR 
N 

4120R PRINT"ACKELNGSPACEI BEFINDENTSBAGEISICHTSPA 

LEIANISPAGEIDENTSPALE S43NDEN." 

A121@ PRINFM (SEI INSSPACE SHITCHTERTSPAREIMITISPA 
GEHEINEMISPACE SSICHWERT ISPACKI VERSPERRTIRIGHTID 
IRTSPAGEIDENTSPACE SWIEB. " 

41215 IF 0%(5,1)=@ BOTO 41230 

41228 PRINT" {SEIRTSPACEISAGT CSPACEIDUTSPALEIW\RD 

EST{SPACEIDIEISPACE SHIRHLENISPAGEIDERISPACE 343 

EI-" 

41221 PRINT"SEN{SFACEIBETRETENTSPALEIUNDISPAGEIY 
ERLANBTISPAGEIEINISPÄCE SZIEICHEN® 

31222 PRINT"DEINESTSFAGE SKIENNENS, "RETURN 
41230 PRINT” {SEIRTSPAGEIERN TESPACEIFREUNDI-ICH, € 
SPAGE}VERBEUGT {SPACEISICHTSPACEIDICH" 

41249 PRINT" BEWÜNDERNDESFACEFANSCHAUENDISPACEHIN 

































































DISPACEH.A_TISPALEIDICHISPACE$ RICHTIWEITERTSPAC. 


E3GEHEN. "ARETÜRN 

A13AA PRINT" STWORTSCSPACEIGEHTISPACEHEINISPACE $ 
SIEITENGANGTSPATEFAB," — 

41318 PRINT"WHRENDISPACEFIMESPACE SNIORDENLSPA 
EIDIELSPALEIBERNHMTENTSPÄCE C+ SRITUME" 

41328 PRINT" (SDIERTSPACE SHIEISENtE- SPACEILIEBE 
N. ":RETURN 

414268 PRINT"UN{SPAGEIBISTLSPACEIDUHSPACEH INTSPAC 
E}EINEM(SPAGEIDERTSPACE SRITUME , {SPALEI IN" 

41418 PRINT"DIE{SPACEISICHLSFACEIDIECSPACE, SHIEIL 
SEN{SFACEFAUSTSPACETDERTSPALE SWELT" 

41428 PRINT*ZUR\CKZIEHEN. (SPACE SEI INERTSPACEIDI 
ESER(SPACE SEIINGIEDLER® 

4143@ PRINT"SITZT{SPACEHINTSPAGEIEINERLSPAGE SEI 
CKE{SPACENUNDESPAGEI BETRACHTET" 

41449 PRINT"DICHLSPACEIKLUB. "RETURN 

41508 FRINF"ALTEISPACE SLYUUIFTISPACEIBTRENTISPACE 
>AUSCSPACE SHIDRDENTSPALE}INTSPAGEIDIE" 

a151@ FRINT"BRO_ECSPACE SGIROTTE. {SPACE SKILEINE 
XSPACE, SCIH"NBE (SPALE?FNHRENTSPACEI NACH" 

41528 PRINT" {SHIORDENISRACEILUNDESPACE SHIESTENS 
PACEIAB." 

41525 IF FZt16) GOTO 41558 

„41538 PRINT" <SEIINEISPACEHUNSICHTBARETSPACE, SKIR 
"AFT CSPALEIHINDERTTSPACEIDICH" 


























41548 PRINT"IEDDEHTSPACEINACHITSPACE SNIORDENISPA 





CE> ZIHSPALEIGEHEN. * 
41558 IF FAt15)=1 THEN PRINT"{SEIINTSPACE SGIEIS 


x63> 
<30> 


<115> 
<1B4> 
«ı1807> 
<30> 

<151> 
<ır1? 
<12977> 
<48> 

<253> 
«235> 
<117> 


“773 


<170> 


<106> 
<184> 


«175> 
<177> 
<152> 
<210> 
«35> 
<35> 


‘<195> 


<50> 


<4> 


<3> 
<236? 


<139> 


<227)> 
<57> 
<146> 
<9> 
<1247> 
«245> 
977 


<99> 
<248> 


247> 
<4> 


si28> 
<142> 


<49> 
<B> 


TISPAGEIGREIFTLSPACEIDICHTSPACEIAN!» 

41568 RETURN 

41600 IF R%t16,1)>8 BOTO 41458 

41605 PRENT"CHONT{SPACEIWIEDERTSPACEIWIRDISPACEID 
EIN{SFACE STIATENDRANGTSPACEIGE-" | 

A161D FRINT"STOPT.{SPACE SEHINELSPACEIKLEINEISPA 
CE SHIOLZTNRTSPACEI VERSPERRT" 

A1&2D PRINT"DENISPACE SGHANBLSPACEFNORBWRTS, "ER 
ETURN 

41650 PRINT"RLCHST\CKETSPACEIEINERTSPACE SHIOLZT 
NRISPACEILIEGENTSPACEFAUF” 

41660 PRINT"DEM{SPACE SWIEBTSPAGEINACHTSPACE 58) 
ORDEN. "3 RETURN 

4170B IF FXt1B)>1 GOTD A178 

417@1 PRINT*ELIHMTISPACEIVORISPACE SSICHRELKISPA 
LEISIEHST (SPACE?DUTSPACEI INISPACEIEINER" 

4171R PRINT" {SN}TESCHE, (SPAGEFDIETSPACEFIMITISPAL 
EIEINEMESPAGE SGHETTERISPACEIVERRIE-" 

41720 PRINT"BELT{SPACEIIST TSPALEIDEINENTSPACE S 
NHIEISTERISPACEHUND{SPACE SLIEHRER" 

41730 PRINT" (SHIARDALAR. {SPACE SIINISPACEIDERISA 
ACE SHIITTEISFACEIDES{SPACE SAIAUMES" 

41748 PRINT"ISTISPAGEIEIN{SPACE SBIRUNNEN{SFAGEI 
AUSTSPACEIDEMISPACEIETWASTSPACEIVIULETT" 

41758 FRINT"LEUCHTET. "SRETURN 

41768 FRINT"ITTEMISPALCEIINTSRACEIDERTSPACEIKREIS 
RUNDEN{SPACE SGIROTTETSPACEIBE-" 

41778 PRINT"FINDET{SPACEISICHTSPACEIEINTSPAGENVI 
OLETTETSPAGEFHLEUCHTENDER" 

41788 FRINT"{SBIRUNNEN. "zIF FX18)=3 THEN RETURN 
41790 PRINT" SSIINTSPACEIEINERSPACE SNITEBCHELSR 
ACEISTEHT CSPACEIDEIN{SPACE SMIEISTER" 

41791 PRINT" SHIABDALAR. "RETURN 

A108 PRINT"ETZTISPACEISTEHST ISPACEIDLHSPACEI ING 
SPACEIEINEMISPACE SGIÄANBISPACEIVON" 

Y1R1D PRINT" (SGIARKURSLSHIFTSPACE SPIALAST. SPAL 
E SEISTSPACEITST (SPACE 3SEHRTSPAGEIKALTCSPACEHIE 
R," 









































A1828 PRINT"UND{SPAGEIFANTSPAGEIDERLSPALEIESTLIEN. 





EN{SPACE SHIANDESPAGEIH"NGTISPACEHEIN® 

41838 PRINT"SCHMUTZIBERTSPACE SWIDRHANG. "ıRETURN 
A19BD PRINTHUHISTSPAGEISITZTLSPACEIDERISPACE SH} 
EXENMEIBTERTSPACE SBIARKORTSPALEIAUF*) 

41919 PRINT"SEINEMTSPACE} DUNKLENISPAGE STIHREN. € 
SPACE SEHR{SPACEISCHAUTLSPACEIDICH" 

41928 PRINT" HOCHM\TIGCSPACEHINDCSPAGEIGERINBSCH“ 
TZIBTSPACEIAN. “ 

41930 IF FXi2@)=B THEN RETURN 

41749 PRINT" {SNFACHTSPACE?DEINEMISPACE SAHUSSPRU 
CHLSPACEIKONNTELSPACFEFERTSPACEISICH® 

41958 PRINT"NICHT {SPACE MEHRTSPACEIBEHEBEN. "LRET 
URN ; 

49900 























REM RBB EHE 

47418 REM LNTERPRÜGRAMNE 

AFQAZB REM Haren TREIBEN: 

497050 : 

SOBENM A=PEEK (211) +48HPEEK (214) +3B154 

SBUBZ V=PEEK (214) 

SAB1Ld Z=(ASC (ZEI)-45)#4+128 

SRaB2B PÜKE A,ZıPOKE Arı,Zz+i 

Suas® POKE AY4B,Z+2:PDKE Ar41,2+3 

SoR4D A=Ar5120 

Sau5ß POKE A,CL=:POKE Arl,CL:POKE A+4B,CL;POKE A+ 
41,CL 

SUBAR PRINT" KRIGHTZ23"FSRETURN 

50870 3 

5salae P=40 

Selig IF MIDSCAF,P,iI<>"{SPAcCEr}" AND MIDS{A#,P,i1 
I<>"" THEN P=P-LıGOTO 5811R 

50128 PRINT LEFTStA®,P-I} 

5213 As=MIDE IAE,P+ri} 

sai4B IF LEN(A#I>S9 GOTO 5BLAB 

5915@ IF A$<>"” THEN PRINT A$ 
5a1640 RETURN 

50288 A=FlıPÜKE 444 ‚ASAS=LEFTE CASH" CSPACE2SI" „3 
5 

sazıd FRINTASz"#"4:PDKE #46, FaPRINT*TCHRI") SPOKE 
Ha, ASPRINT“E" 

58228 GET B#: IF B$=""* GOTD 59220 

50258 IF BS<ICHRS (IS) THEN FriF+1) ANDISSPRINT" CH 
#27":GOT0O 59218 

5P24B RETURN 

599978 REM HEINE 

57971 REM INITIALISIERUNG 

59992 REM ran ati 

539993 ı 


"r 


GCompute mib 


<98> 
<136> 
<aB> 

<252> 
<129> 
<27> 

<112> 


<202> 
<194> 


«175> 
<1357 
<221> 
«2357 


1297 
<94> 


<2480> 


<21&> 
<172> 


s176> 
«173 


213? 


*147> 


x230> 
<05> 


x63> 
<157> 


41295 
<172> 


251? 


<1997> 
x214> 
*242> 
<234> 
<127> 
<ı19&> 
<1409> 
<193? 
<179> 
<53> 

<B88> 


<162> 
£P> 

1477 
<135> 


x B 
<4B> 


<199> 
«1297> 
“20> 
<284> 
65? 


<42> 


<2t1> 
<55> 


<83> 
<146> 
<239> 
<241> 
<241> 
<125> 


5/87 


| 
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sauua POKE 53289,0: PÜKE 53281 ,B: POKE 33245,18 
sagmid HF=Q:F1=7;F2=-SıcL=1d:PM=1B2 


salsln 8 
a FR REM SRRERRHRHEHHHRHIHRGIHHHIIHNE 
+016B REM TITELBILD 


sBi9a REM Hera 
40208 PRINT"{CLEAR DOWNS ETREN CTRLH SPALEBY“" 
“a22a 24="P":60SUB SQaRB 

502358 PRINT" IYELLOHYHILIPP{SPACEZI”> 

592432 Zs="K"ıGODSLB SPDOR 

69258 FRINT"@HNISPATEIPRESENTS" 

526 PRINT TAB (17535 

40270 Z4="M*":GOSUB 5AaDa 

69288 PRINT"INASTSPACEY"Z 

69298 Z4=e"G"sGOSURB SAOBR 

583980 PRINT"UNDUR" 

sa31m FRINT"LDOHNS SPACES CYAN SEIINTSPACEIDEUTS 
CHES{SPACE, SFIANTASYADVENTURE" 

6932@ FPRINT"{DOHN GREEN SPACEPYSLSPACEILIBATSPAG, 
EIBYISPACE SPIHILIFFISPACE SKIEHN" 

69339 PRINT"EDOHNZ FURPLE SPACEI? SEIITTETSPACEI 
WARTEN{SRPAGE SSIIEISPACE} ! E 
Hund PÜOKE 53245,27 

H07BU = 

6108 V=A2:0=44:H=25: R=19ı AFe21 

&1810 DIM VEiW) „DE (OD) „HE CHt „RS {R) 

61820 DIM DX(O,23 ,‚RA(R,6) „FAtAF)} 

&1m3B DIM Wi) 

H11Bod READ As: IF Aka" SOTO 41208 

H111A AVSAV+LEVELAVI AS 

61120 GOTO 81108 

GiZAN READ ASı IF As='"#t G0TO 41308 

61218 ADSAD+1H0F1AD)SAFTREAD DOX(AD,@) ‚0OXIAD,2),D 
AAQ,2) 

61228 GDTD 41208 

siSgm READ As: IF Ag="#" GOTO 81408 

61318 AH=AHHILEHStAH) SAH 

61328 EOTO 41340 

61490 READ Ag: IF As="a" BOTD 81598 

61419 ARSAR+IIRS (ARI=AS 

641428 FOR I=1 TO & 

614359 REAB RXCAR,TI 

61440 NEXT I 

61458 GOTO 51428 

15a RR=1,R=-1 

släRa PRINT"THR SPACE4 SDIRNCKENISPACE SSIIETSPA 
CEIEINELSPACE, STSASTELSRPACEIZUMISPACE SSITART” 
61510 POKE 198, B:WALIT 198 ,t1ıGET A$ 

61628 POKE 53255, 11: PRINT”IGLEAR DOHNS SPALEI>”"; 
61650 Z#5="D":60BEuB Spaım 

61648 PRINT"IYELLOWIEINTSPACEIGRO_ERISFACE SLIEH 
RER, TSPACEIDERTSPACE SZIAUBERER" 

81658 INT"ISPACE3 SHIABDALAR, TSPACEIZUGLSPACE} 
VORISPALEIEINEMISPACE SJIAHRISPACEIZU" 

&1äAQ PRINT" SPADE3IFEINERISPACTEIGEHEIMEN{SPALE S 
RIEISE „ {SRACEIVONTSPACEIDERTSPACEINUR" 

61670 PRINT"ISPACEIIDULSPACEIETWASTSPACEIWEI_T,C 
SPACEFZUTSPACEFEINEM{SPACEIVERNICH-" 

61471 PRINT" {SPACE3SITENENTSPACE SSICHLAGCSPACEIG 
EGENTSPACEIDEN SPACEIGRAUSANEN" 

&1&72 PRINT"ISPACEI SHIEXENMEISTERTSPACE SGIARKO 
RISPACE)IAUS." 

61898 PRINT"{DOHN SPACEI SDIAISPACEIDUTSPACEILAN 
BEISPALEINICHTSTSPACEIMEHRTSPAGEIVONTSPACEI IHM" 
&1709 FRINT"ISPAGEFIGEHERT {SPAGEIHABSTTSPACEIUNDT 
SPACE YVORISPACEIALLEMISPACEIWEILTSPACEIDU" 

&171M PRINT"TSPACEISFIHNESPALEITIMISPACE STIRAMET 
SPACE GEFANGEN {SPACEYISAHST „TSPACEIBIST" 

ee PRINT" {SPACESIDUTS FPATEISCHWER SPACE) BEUNRU 
H “ 

617398 PRINT" {BOUN SPACEZ SPIULSPACEIBISTISPACEIZ 
UMESPACE SEINTSCHLU_TFPACEI GEKOMMEN{SPACEI IHM" 
61748 PRINT" {SPACE3F ZUCSPACEIFÜHGENISPAGEIUND SPA 
ACEYZUISPACEIHELFEN. „„* 

siBuq POKE 53245,27 

61918 POKE 198,0:WAIT 19A,1:GET As 

61922 FRINT"ICLEARY" 

1932 GÜSUB 1295:60T0 ıam 

61740 ı 
&20UB REN .- 
&2@@1 DATA NORDEN ‚OSTEN, SUEDEN, WESTEN, OBEN UNTEN 
420%2 DATA NIMM,NEHMEI  HOLE2,GIB,GEBEI „LEGE2,VER 
LIERES 

2003 DATA UNTERSLICHE „SCHAUEA 

62024 DATA INVENTUR,LISTEA „HILFE,LADE „LOAD1 ,SPEI 
CHERE „SAVE 





















































ulm 


<1997> 
<221> 
<37> 
<1&4> 
x235&0> 
<194> 
<23> 
“a2> 
<195> 
«57> 
<3a> 
<47>3 
x97> 
<t141> 
x877> 
“43> 


x227> 
<78> 


<174> 
x8> 
<92> 
“417 
<171> 
<x248> 
<248> 
“2> 
<44> 
<10> 
<11B> 


*98> 
<115> 
<235> 
957 
<217> 
<92> 
K229> 
<ba> 
“al? 
47 
<98> 


2457 


<232> 
<55> 
<102> 
<137> 
x25> 
<B9> 
<143> 
<55> 
<226> 
<12&> 
<242> 
«195> 
<112> 
<184> 
<98> 
<204> 
<186> 
<1a0> 
4239> 
<932> 
<31> 
<65> 
<255> 


<130> 
39> 


<140> 


programme 


62825 DATA DEFFNE „FARBEN ‚PUNKTESTAND, ZEIT ‚BEORE2 

‚LIES,LESEI 

62046 DATA GEHE,BETRETEI ‚BETRITT2,8AGE „SPRICHS „W 

ARTE ,PAUSEI „ENDE,STIRBI 

62987 DATA TOETE ,ECHWIMME,ENTZLENDE „ZUENDE1 „ERLE 

LCHTEZ,1.OESCHE „ERLOESCHEI 

A20@8 DATA ZIEHE ,SETZEI ,REITE,ZERSTOERE ‚VERNICHT 

E1,FRAGE „BEFRAGE1 „UNTERHALTEZ 

62827 DATA BERLEHRE,TALUCHE , ZERSCHNEIDE? „SCHIEBE, 

ZERTRUENMERE9 „VERSCHIEBE2, ZEIGE 

6201@ DATA TRINKE 

628997 DATA #* 

62108 4 

62181 DATA SCHWERT,I,, 

42182 DATA TISCH,2,1, 

62183 DATA TUERE,2,1» 

62124 DATA SCHUBLADE,2,1, 

42105 DATA BUCH,1e, 

62126 DATA XYLKS,5,, 

62107 DATA MESBER,1,4, 

62128 DATA MANN.3n , 

62197 DATA KOMPABS,1,,2 

&211® DATA GEE,2,8, 

&2111 DATA SEEUNGEHEUER,S,B, 

62412 DATA UNGEHEUER1 44» 

62113 DATA EQUARZ,S,» 

62114 DATA AST,1,9,2 

&2115 DATA BUESCHE,2,1@, 

82116 DATA LAMPE,1,11,1 

62117 DATA BAUM,Z,1B, 

62118 DATA WAECHTER,3,12, 

&2117 DATA FACKELN,2,12, 

62124 DATA WEISEN,4,14, 

62121 DATA TARNKAPPE,1,s1 

62122 DATA KAFPELys» 

62123 DATA FELSWANDE, s, 

62124 DATA EINSIEDLERA, se 

62125 DATA WEISERS, ,; 

62126 DATA GANB,2,10, 

&2127 DATA MINAS1,,, 

&2128 DATA GEIST,S,, 

62129 DATA HOLZTUERE,2,16, 

&213D DATA BRUNNEN,Z,17, 

62131 DATA MAGDALAR,4,17, 

62132 DATA ZAUBERMEISTERI,G% 

62153 DATA LEHRER2, ,» 

62134 DATA WASSER,2,17, 

&2135 DATA GITTERSTAEBE,2,17, 

62134 DATA ZETTEL,1,4; 

62137 DATA FLUESSIGKEITZ, 5,» 

52138 DATA VORHANG,2,18, 

62139 DATA SOLDATEN,3,i8, 

62148 DATA FROTZL,5,. 

62141 DATA PATRI,S,4 

62142 DATA GARKOR,3,19, 

62143 DATA HEXENMEISTERIy4s 

62199 DATA # 

52208 : 

622@1 DATA DER,DIE,DAS,DEN,DEM,WER, NACH, GEN, DURC 

H,AB,NIT,IN,IM,AUF,AUFS 

62282 NATA DURCH,AM,AN„GUNDUR,UM 

62297 DATA * 

62300 3 

62301 DATA Dyypsnn 

62302 DATA YuSanlons 

62303 DATA 2,7, 5u2y 01‘ 

62388 DATA M,yo91 +3 

62385 DATA D,8,,347;5 

62385 DATA Py&,6,6,0,% 

42387 DATA A,,5,3,0% 

62398 DATA EyzySyan 

62309 DATA H,lDyavar 

6231@ DATA Yya3Fyrn 

62311 DATA E,12,,18,,38, 

&2312 DATA Fyyyll;yy 

62313 DATA 0,14,15,12, 4% 

82314 DATA N,5915s 5» 

62315 DATA Kyans1Sn 

623516 DATA 8,5 41Sy nr 

62317 DATA Gayolänss 

62518 DATA IyoalYyns 

&2319 DATA Ryzyr1ß,5 

62399 DATA # 

63280 CLR 

63999 PRINT (38#1@24-FREI1)) 7254 
ENDE DES LISTINGS 


Sompube mib 


<28> 
sı191> 
<7a> 
<134> 


x2> 
<154> 
«92> 
*192> 
s58> 
<247}% 
<29> 
<189> 
<9a> 
<131> 
x93> 
<133> 
<176> 
<I> 
<ı11>? 
<201> 
«1032 
“Pa> 
<136> 
<1763 
<121> 
«19753 
<178> 
<2u8> 
*149> 
<225> 
«7977 
<162> 
<ı19> 
<x82> 
“3) 
<777 
x172> 
<133> 
«1443 
2547 
<223> 
<AB> 
“1323 
<ı11> 
<232> 
“723 
<25? 
<156> 
<85> 
<65> 
<34> 
<192> 
<36> 


<224) 
x237> 
<37> 

137? 
73 
<175> 
<239> 
<231> 
24775 
<i1l&> 
1693 
<210> 
<131> 
<149> 

«221> 
«155> 
“I2> 

<187> 
<1973> 
«213> 
<197> 
<211> 
<252> 
<137> 
1703 
247 
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letzter Teil 





Mit nur acht Sprites 
muß man sich nicht 
zufriedengeben. - 
Um mehr als acht Sprites zu er- 


zeugen, gibt es sogar zwei Mög- 
lichkeiten, die aber'beide leider eı- 
nen kleinen Haken haben. Die er* 
ste und schlechtere Möglichkeit 
ist, den von dem 'Timer A der 
CIA #1 erzeugten IRQ auszu- 
nutzten und jede 1/60 Sekunde in 
den entsprechenden VIC-Regi- 
stern zwischen verschiedenen 
Gruppen von Sprites mit unter- 
schiedlichen Positionen hin- und 
herzuschalten. $o erscheinen ein- 
mal die ersten acht Sprites und so- 
fort danach die anderen acht und 
es entsteht die Illusion, es befän- 
den sich 16 Sprites auf dem Bild- 
schirm. Nur leider blinken diese 
wie verrückt, da sie ja dauernd an- 
und wieder ausgeschaltet werden, 
Falls Sie es trotzdem einmal mit 
dieser Methode probieren wollen, 
sollten Sie sich zwei Tabellen mit 
allen Spritedaten (d.h. X/Y-Posi- 
tionen, Sprite-ein/aus-Informa- 
tionen, Blockangaben für die 
Spritebilder, X/Y-Ausdehnung 
der Sprites, Festlegungen Multi- 
color-/Hires-Sprite und Farben 
der Sprites) anlegen. Je nachdem, 
welche acht Sprites vorher gesetzt 
waren, können dann im Interrupt 
die Daten aus Tabelle 1 oder Ta- 
belle 2 in die für Sprites zuständi- 
gen VIC-Register übertragen wer- 
den. Genauso wird es auch in Li- 
sting 5 gemacht, nur daß es sich 
hier um die andere und auch in al- 
len professionellen Spielen ge- 
nutzte Lösung handelt, mehr als 
acht Sprites -und .zwar diesmal 
flimmerfrei- zu erzeugen. Wie Sie 
sich sicher denken können, wird 
dazu wieder ein Rasterzeilen-IRQ 
herangezogen. ö 


Interruptprogrammierung. 


| Artikelserie von 
Daniel Durstewitz und Waldemar Raaz 


"Zunächst werden die Daten aus 


Positions- und Farbtabelle 1 in die 
entsprechenden VIC-Registerüber- 
tragen und damit die ersten acht 
Sprites in der oberen Bildschirm- 


hälfte positioniert. Der nächste . 


Rasterzeilen-IRQ) wird für Zeile 
155 etwa in der Mitte des Bild- 
schirmes festgelegt. Nach Auslö- 
sung dieses IRQs werden durch 
Übertragen der Positions- und 
Farbrabelle 2 die zweiten acht 
Sprites in der unteren Bildschirm- 
hälfte gesetzt, ohne daß die schon 
gesetzten acht Sprites in irgendei- 
ner Weise davon beeinflußt wer- 
den, da }a, wie schon bei der Be 
schreibung zu Listing 3 (dreifarbi- 


gr Hintergrund) erklärt, zunächst 


ler ganze Bildschirm weiter bis 
zum Ende aufgebaut wird, bevor 
der obere schon aufgebaute Bild- 
schirmteil irgendwelche AÄnde- 
rungen erfahren kann. Der näch- 
ste Rasterzeilen-IRQ erfolgt dann 
wieder bei Zeile 0 usw. Wenn 
man nicht nur wie in Listing 5 In- 
formationen über Spriteposition, 
Sprite ein/aus und Spritefarbe in 
den Spritedatentabellen zusam- 
menfaßt, sondern wirklich alle 
Sprite betreffenden Informatio- 
nen, die in die Register des VIC 
bzw. in die Speicherzellen - 07F8 
bis — O7FF (dez. 2040 bis 2047, 
Angaben der Blocks, in dem ein 
Spritebild abgelegt ist) gesetzt 
werden, lassen sich sogar alle 16 
Sprites einzeln und vollkommen 
unabhängig voneinander über die 
Spritedatentabellen ansprechen. 


Es befinden sich jetzt auch tat- 
sächlich alle 16 Sprites gleichzeitig 


auf dem Bildschirm, wo ist also . 


der Haken bei der Sache? Wenn 
Sie nicht gerade an ein Wunder 
glauben (wobei wir nicht bestrei- 
ten wollen, daß unser C 64 wirk- 
lich voller Mysterien steckt), ha- 
ben Sie sich wahrscheinlich schon 
selbst gedacht, daß die Rasterzei- 


le, bei der der Rasterzeilen-RQ 


ausgelöst wird, eine scharfe Gren- 
ze darstellt, über die sowohl die 
Sprites aus dem oberen Bild- 






E-6&4 LISTING * CHECKSUMMEN (© v1.0) 






100 REM # TEXT-/ GRAFIKBILDSCHIRM MISCHEN * 
105 REM 

110 REM DIESES FROGRAMM UNTERTEILT DEN BILDSCHI 
RM DES C&a4 IN ZWEI TEILE: 

115 REM IM OBEREN TEIL KIRD GRAFIK, IM UNTEREN 

TEXT DARGESTELLT. 

120 REM DAS PROGRAMM BEDIENT BICH DAZU DES RAST 


<248> 







<104> 







<2359> 

























































FRZEILENINTERRUPTS DURCH <a5> 
125 REM DEN VIDEG — CHIP IM Tö4. «172> 
IS0 2 <198> 
135 3 <193> 
149 DIMDX (3,24) s FORI=OTOZ: FORN=OTDZ3SSREADDX CI PLL}} 

z Z=Z+DA11,N) ZNEXTN: NEXTI <121> 
195 IFZ< 35601 THENPRINT" CDOHNIFEHLERTSPACEIINISPA 
CEIDENISPACEIDATA-ZEILENTSPAGEH1A5-1751 "END <a83> 
150 2 = 2098? 
155 » REM DATEN FUER DIE GRAFIK <a> 
140 : <Z1d> 
1655 DATA1,2,4,8,97,8,4,3,1.2,242,24141,1,0,0,0,0, 
0,0,0,0,199,73,34,247 0 0222> 
170 DATA247,247 ,34,195, 135,8,9,9,08,8,9,8,1356, 156 
+73,42,2840,0,0,192,32 <212> 
175 DATA16,136,200,136,15,224,192,32,32,32,32,54 
ı64,653,129,128,0,0,0,0,0,0 <28> 
180 = 2 <238> 
185 : 1 <243> 
180 Z=0: FORN=491321049283: READAF:AS=LEFTFLAF,ZI <93> 
175 AI=ASC LEFTE(AF,1)) SA2=ASDIRIGHTSCAS,1)) <73> 
200 Al=A1-48: IFAL>FTHENAL=AL-7 <88> 
205 A2=A2-4B: IFA2>7THENA2=A2-7 <149> 
210 A=tiärA1+A2: Z=Z+A:POKEN,A:NEXT <11> 
215 IF2<>17433THENPRINT" {DOHNFFEHLERTSPACEI INESP 
AGEIDENESPACEIDATA-ZEILEN(SPACENZI5-605! "SEND <52> 
220 PRINTCHR& (147) 3FORN=OTDIB-PRINT=:NEXT <196> 
279 PRINT ER HHRTEIEEEERE 

“rn. <64> 
236 FRINT"#{SPAGCEIBIR"z <223> 
235 PRINT"#TSPACEITEXT{SPÄACENUND tSPACEFGRÄFIKISP 
ACEFALFTSPACEHEINENCSPACE}BILDSCHIRMISPACEIRNZ <241> 
240 PRINT"#{ISPACEISIH"; 2357 
245 PRINT" RITTER 
*"CHREILSTICHRECLAB) "RR", <73> 
250 59549152 =: REM RASTERINTERRUPT EIN 153? 
255 X=INT {RND (0) #38) ı Y=INT {RND (0) #18) : B=B1F2+X«B 

+Y#320 737 
250 FORT=CTD2:FGRN=0T123:POKEB+INT {N/8) #3204N-IN 
FIN/OY&B+IRB,DARLI ,N? =NEXTN,I <76> 
243 GOT0235 S104> 
270 3 £<73> 
275 » REM DATEN FUER MASCHINENPROGRAMM <245> 
ZBO : x x853> 
285 DAtrA 78 , : START SEI NLSPATE 

3 INTERRUPT <FPACEFSPERREN x96> 
290 DATA A9,„7F s "LDA A67F "SPACE 
>HDECHSTWERTIGESTSPACEHRÄABTERZEILEN- %131> 
295 DATA 2D,11,D0 : AND $DO11 "{ISPACE 
3RITISPÄGEILDESTCHEN £ <51> 
Ss> DATA E8D0,11,DO =: STA $DO1ll h. <2507 
3053 DATA A9I,00 = LDA #200 “SPACE 





*20> 


z10 DATA 8D,12,D0 3 SIA $D012 





"SPACE 







IINSPACEFZEILECSPACEIOTSPACEIVORBEREITEN <a9> 
315 DATA A2,SF P LDOX #$3F "ISPACE 

IGRAFIKSPEICHERTSPAGEILDESCHEN <57> 
32) DATA 86, Ft 3 SIX $FC “ «31> 
325 DATA Ad,co ’ LDY #200 D <174> 
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schirmteil als auch die aus dem 
unteren nicht einma! mit einem 
einzigen Punkte‘ hinausdringen 
können. Der Grund ist ganz ein- 
fach, denn zur Zeit der Raster- 
zeilen-IRQs ist ja die obere Bild- 
schirmhälfte schon fertig aufge 


baut und die ersten acht Sprites. 


stehen bereits, können ihre Posi- 
tion also nicht mehr verändern. 
Unter dieser Rasterzeile werden 
dann acht neue Sprites erzeugt, 
und sollten Sprites aus dem obe- 
ren Teil noch nicht ganz fertigge- 
stellt sein, d.h. eigentlich über die 
Zeilengrenze hinausragen, so 
wird der untere Teil einfach abge- 
schnitten, es sei denn, es werden 
auch nach dem Rasterzeilen-IRQ 
für das Sprite mit derselben Spri- 
tenummer wieder dieselben In- 
formationen gesetzt, was faktisch 
ein Sprite weniger bedeutet. Spri- 
tes, die nach dem Rasterzeilen- 
IRQ erstellt werden, können auch 
nicht nicht in den oberen Teil ge- 
langen, da dieser ja bereits fertig- 

estellt ist. Je nach den Bedürfnis 

er augenblicklichen Ereignisse 
läßt sich zwar die IRQ-Rasterzeile 
innerhalb eines Programmes be- 


liebig verschieben und damit die. 


Bewegungsfreiheit der einen $pri- 
tegruppe erweitern und die der 
anderen einschränken, nie aber 
werden sich Sprites der verschie- 
denen Gruppen berühren kön- 
nen. Allerdings kann, wie schon 
kurz erwähnt, ein.Sprite über die 
Rasterzeilen-Grenze hinausstos- 
sen, wenn in beiden Spritedaten- 
tabellen für die Sprite mit dersel- 
ben Nuntmer dieselben Informa- 
tionen gösetzt sind, (Sie können 
das bei Listing 5 selbst ausprobie- 
ren, indem Sie einfach die Posi- 


tions- und Farbdaten eines Sprites, 


aus Tabelle 1 mit denen aus Ta- 
belle 2 gleichserzen und das ganze 
Sprite in die Bildschirmmitte ver- 
schieben). Durch mehrere Raster- 
zeilen-IRQs hintereinander lassen 


sich sogar bis zu 64 Sprites reali- 


sieren, was die Bewegungsmög- 
lichkeiten der einzelnen $prites 
aber immer weiter begrenzt. 


Und jetzt folgt der Showdown... 


Sprites im Rahmen 

Als letztes Beispiel haben wir uns 
eine schr interessante Änwen- 
dung ausgesucht, die noch nicht 
so bekannt ist. Mit einem kleinen 
Trick ist es nämlich möglich, 
Sprites auf dem Rahmen ober- 
und unterhalb des Textbildschir- 
mes darzustellen. Geben Sie dazu 
bitte Listing 6 ein und starten Sie 
es probehalber. Wenn Sie alles 
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‘richtig eingegeben haben, sehen 


Sie jetzt ein Sprite, das sich senk- 
recht über den Bildschirm be- 
wegt. Der Rand ober- und unter- 
halb des normalen Textfensters 
hat die Farbe des Bildschirms an- 
genommen, so daß der Eindruck 
entsteht, der Bildschirm sei nur 
noch rechts und links von einem 
Rahmen begrenzt; und ebenso 
verhält sich das Sprite: es wandert 
über das Textfenster hinweg auf 
den Rahmen - und bleibt sichtbar. 
Ein netter Effekt “ nicht wahr? 
Nun zur Funktionsweise: 

Der VIC im C 64 erzeugt den 
Rahmen mit Hilfe zweier Raster- 
zeileninterrupts. Einen in der Ra- 
sterzeile, in der das Textfenster 
beginnt - hier wird von Rahmen - 
anf Bildchen babe umgeschaltet 
«und einen in der Zeile, in der der" 
Rahmen wieder beginnt - hier 
wird zurückgeschaltet, Dieses Zu- 
rückschalten auf die Rahmenfar- 
be kann man mit einem Trick 
verhindern: man programmiert 
den VIC so, daß er in der letzten 
Zeile des Textiensters einen Ra- 
sterzeilen-IRQ auslöst. Schalter 
man dann an dieser Stelle von 25 
auf 26 Bildschirmzeilen um, wird 
dem Computer vorgegaukelt, er 
befinde sıch schon im Rahmenbe- 
reich und habe die Umschaltung 
von Bildschirm- auf Rahmenfarbe 
schon vollzogen. $o vergißt der 
Computer quasi die Umschal- 
tung. Danach schaltet man wieder 
auf 25 Zeilen zurück, so daß der 
Vorgang im nächsten Bilddurch- 
garıg wieder von vorne beginnen 
kann. Man kann zwar im hinzu- 
gewonnenen Bildbereich keine 
Texte darstellen, doch mit Sprites 
ist dies kein Problem, wie die De- 
no zeigt. Für Spieleprogrammie- 
rer tut sich hier sicherlich ein wei- 
tes Feld auf. Eine Besonderheit 
bei diesem Trick sei nicht ver- 
schwiegen: der C 64 bilder das 
Bitmuster der Speicherzelle 16383 
(hex. -3FFF} als Streifenmuster 
auf dem Rand ab, so daß ein Wert 
verschieden von Null störende 
Streifen auf dem Rand erzeugt. 
Sie sollten also möglichst darauf 
achten, daß diese Speicherzelle 
mit Null belegt ist, wenn Sie von 
diesem Trick gebrauch machen 
wollen. Bisher ist uns noch keine 
Men bekannt, diesen stö- 
renden Nebeneffekt abzustellen, 
doch wenn man ihn kennt, kann 
man ihn ja problemlos mit Hilfe 
der besagten Speicherzeile kon- 
trollieren. 

$o leid es uns auch tut, werte Le- 
ser, nun ist der Zeitpunkt des 


schmerzlichen Abschieds gekom- 


men, denn nun haben wir so: 


ziemlich unser gesamtes Inter- 


kurs 


Platz in dieser wunderschönen 
Zeitschrift für Sie frei, Es war 
wirklich schön mit Euch, Jun- 


rupt-Know-How an Sie weiterge-  gens... 


geben. Ihnen werden sicherlich 
noch viele, viele Anwendungsmö- Daniel Durstewitz 
glichkeiten einfallen, und wenn 

Sie gut sind, ist bestimmt nochein Waldemar Raaz 


DATA BA,FB LODF2 S5TY $FB 

DATA 98 TyA 

DATA 9L,FR STR (#FB) ,Y 

DATA 88 DEY 

DATA DU,FB BNE $LOOP4 

DATA A&,Fc LDX $FC 

DATA CR DER 

DATA E9,20 ECPX #320 

DATA BO,ED PCS $LODPZ “ 

DATA 2,50 * LDX A3<IRDNEU "SPACE 








LODP1 


Eu Een 


zB80 DATA AD,CO ı LDY #$>IRHNEU "SPACE 

NEUE CHPACEFIRQB-ADRESSE {SPACE?HI-BYTE 

395 DATA 49,901 H LDA #801 "ISPACE 

IMASKELSPAGEIFUERTSPACEHRÄSTERZEILEN-IRBISPACEIE 

Im 

370 DATA DO,1O F} "SPACE 

3=-->SLACEI IMMER 

395 DATA AZ,1B a « LDX #$1B "ISPACE 

FERAFIKLSBACEY AUSSCHALTEN SPACE UNDTSPACEI ZURUEC 
LDY %$15 


k 
400 DATA A0,15 3 VISPACE 
FAUFLSPACEISTÄNDARD-TEKTBILDSCHIRNM 

STX $D011 a 


BNE $SETZEN 


STY spora D 
LDX #331 "SPACE 
JALTETSPACEI IRO-ADRESSE £SPAGEN.O-BYTE 
420 DATA AG,EA N LDY #$EA NESPACE 
IALTEISPACEI IRU-BDRESSESPACEIHI-BYTE 
425 DATA A9,00 3 LDA #500 "LSRACE 
IMÄSKELSPACEIFUERTSPACEIRASTERZEILEN-IROCSPACEIA 
US 
‚430 DATA 8E,14,03 ı SETZEN STX 0514 WLSPACE 
FIRD-VEKTORTSPACEIBETZENSPACEHLO-BYTE 
435 DATA B6„15,08 : STY $0315 MISPACE 
2 IRQ-VEKTORTSPAGEISETZENCSPACEIHI-BYTE 
440 DATA 80,14,D0 "STA $Do1A "ISPAcE 
FIMR SPACE) IMISPACEIVICTSPACEISETZEN 
435 HATA 58 E CLI "ISPACE 
?INTERRUPT{SPAGEIFREIGERBEN 
450 DATA &0 ® RTS "ISPACE 
?ZURUECKTSPAGEI INSTSPACEF BASIC 
455 DATA EA ? NOP 
460 DATA EA NOP 
465 DATA ER NOP 
470 DATA EA NORP 
475 DATA EA NOP 
480 DATA EA NOoP 

DATA EA NOP 

DATA EA NoP 

DATA EA NoP 

DATA EA = . NOP 

DATA AD,19,00 ı IRANEU LDA $D019 
FIRR{SPAGE} IM{SPACEIVIC SPACEFLESEN 
19 DATA 80,197,00 : 5TA 30019 
FUNDESPACE +LOESCHEN 
SIS DATA 29,01 £ AND #401 
IBITCSRACEIOISPACEIBESETZTISPACEI? 
520 DATA D0,07 2 PNE $RASIRQ 
3--- 3 1SPACENITA f 
575 DATA NAD,OD,UC a LDA $DLOD MLSPACE 
INEIN, tSPACEIDANNTSPACEI ICR{SPACEI INLSPACEIDERES. 
PACEILIOTSPAGEIATSPACEILOESCHEN ; 

MeSPACE 


ISO EeL1 
"ISPACE 


gSO DATA 5B fi 
3 INTERRUPT £SPALEYFREIGEBEN 
$35 DATA A0,S1,EA ı JMP $EAS1 
"ISPACE 
FRASTERZEILECSPACEILADEN 
545 DATA C9,E1 ? cmP RscC1 "iSPACE 
FINTERRUPT£SPALENINLSPAGEF ZEILEXSPAGCEIZOFCSPACEN 
= 


. 


PESPACE 
"LSPACE 
®ISPACE 
N ISPACE 


2--->7SPACEINORMALETSPAGE} TRQ-ROUTINE 
540 DATA AD,12,D00 s RASIRQ LDA $D012 


"ISPA 


550 DATA 80.04 ’ 


BCS $UNTEN 
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<37> 
<102> 
222) 
<78> 
29> 
<140> 
<135? 
<28> 
<107> 


<1977> 


<110> 


<2> 
$135> 


<a7> 
<44> 
<195> 
<bI7 
+125> 


<174> 


<117> 
x131> 
<2397> 
<253B> 
<259> 
785 
<32> 
377 
<42> 
<47> 
<32> 
«537> 
<62> 
<67> 
<72> 
<777 
<156> 
<196> 
<187> 


“229> 


<389> 





47 




















programme 


3---FIEPALEIIA 

595 DATA A9,D1 E LDA #$D1 "SPACE 
INEIN, CSPACEIDANN{SPACEI INTERRUPT SPACE} INESPÄCE 
32EIETSPACEY20F 

Sa0 DATA DO,0O2 E BNE tFLAGI 
}VORBEREITENTSRATEI——-->{SPALCEI IMMER 
Ss45 DMA A97,00 = tNIEN LDA #200 M"ISPACE 
FINTERRUPTTSPACEIINISPACEIZEILEISPACEIOTSPACEIVO 
RBEREITEN 

570 DATA 80,12,D0 s FLAGI STA $D012 "ISPADE, 
IRASTERZEILETSPAGCEIFUERTSPACEINAECHSTENISPALCEITN 
TERRUFT 

575 NATA AD,L1,DO x LDA $DO11 
IHTHRES-ENABLE (SPACEIBITISPACEIFLIPFEN 


"SPACE 


"{SPALE. 


s EOR #420 “ 

SO5 DATA 8D,11,D00 > STA $DO11 u 

590 DATA AD,18,D0 LDA $N018 V{SPACE 

>RBASISADRESSE (SPACEI ZEICHENSATZ/HIRES 

595 DATA 47,0E 5 EOR #$0E "SPACE 
STA $D018 “ 


IFLIPFEN 
&09 DATA 8D,18,00 
605 DATA AC,BI,ENA et JMP $EAB1 "{SPACE 
I--->{SPACEFENDETSPACEI DERTSPAGE } NORMALENCSPACEI 
IRO-ROUTINE 
&10 : 
615 REM # WRITTEN 1984 BY WALDEMAR RARZ * 
ENDE DES LISTINGS 


So DATA 49,20 
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105 REM # RAHMEN AUSSCHALTEN 

105 REM 

110 REM DIESES FROGRAMM SCHALTE DIE RAHMENFARB 

E UBER- UND LINTERHALB DES 

115 REM RZALDSCHIRMS AUF DIE BILDSCHIRMFARBE UM, 
AUF DEM RAHMEN KOENNEN 

1209 REM SOMIT SFRITES DARGESTELLT WERDEN. 

125 ı 

130 ı B 

135 FORN=B32TOBF4+ RERDR: Z=Z+D: FOKEN,„D; NEXT 

1409 IFZ<S >RAQLTHENPRINT" TOOHWIFEHLERTSPAGEN INCSPA 

CEYDENISPACEIDATA-ZEILENTSPACEITS-85! "rEND 

145 = 

15G 3 REM DATEN: FUER DAS SFRITE 

mu = 

140 BATA1,148,192,2,73,32,4,394, 16,8, 247 ,136,9,24 

7,200,8,247,136,4,34,16,3 

165 DATALYS ‚224,1, 136, 192,28, 32,2,8,32,2,9,32,2 

‚8,32,1,8, “a1, 8,84, 1.8, 54 

DATAO,1I6, 129,0,156,128,0,73, 0,0,42,0,0,28,0 
175 

180 Fr 

FORN=49 1521049227: READAS=A$S=SLEFTS (AS, ZI 

AI=ASCALEFTE{AF, 1} 2A2=ASCCRICHTE(AS,1)) 
Al=A1-48: IFAL>FTHENAL=AI-7 

N2=A2-48: IFAZ>FTHENAZ=AZ-7 

A=16#A1+h2: Z=I+A:POKEN,„ATNEXT 

IFZ< >12924THENPRINT" NGNNHFEHLERLSPACEI INTSP 

ACEIDENLSPACEFDATA-ZEILENTSPACEIZ2SO-A4151 "END 

215 V=53748 5 REM BASISADRESSE DES VIC 

220 FORE 2040,13 = POKE Y,160 : FÜKE V+21,1 2 FD 

kE v+32,14 5 POKE V+33,6 

225 FOKE 16587,0 = PRINT"ICLEAR LIG.BLBEI” 5 SYB 
47152 

230 FOR '1=0T0255: FORN=1T010r NEXT: POKEV+t, 1s:NEXTı 

6010225 

235 : 





























2A0 x REM DATEN FUER NASCHINENPROIGRAMM 

ZAS r 

250 DATA 7a ® START SEI "ISPACE 
+ INTERRUPT {SPACE} SFERREN . 

255 DATA A9,7F EI LDA #7 -PFISPAGE 
IUNERHSWERTIGESESP GEIRASTERZEILEN-BIT . 

250 BATA 20,12,DO AND 0011 .FLSPACE 
ILOIESCEHEN 

2653 DATA 8D,11,DO 3 STA 3bO1lt ” 

#79 BRTA AF,EF ® LDA #3F9F .» NISPACE 
IRASTERZEILETSPAGEFFUER{SPACEFNAECHSTEN 

275 BEIN &80,12,00 z ‚Sta +D012 MXSPACE 

















200 DATA A220 : LDX #$<CIRDNEU "SPACE 
INEUELSPAGE} IRÜ-ADRESSE {SPACEILO-BYTE 

245 DATA AO,CO x EDV #$>IRQNEU "SPACE 
INEUFSPAGE} IRB-APRESSE SPACEIHI-BYTE : 
290 DATA A9,01 P LDA #801 PESPACE 





IMNSKE LSPALEIFUER SPACE) RASTERZEILEN-IRUISPAGEHE 
IN 













795 DATA BE,14,03 z STK 03514 HISPACE 
+IRA-VEHRTORESPACHFSETZENTSPACEILO-BYTE 

300 DATA A6C,15,03 : STY 0315 "TSPACE 
{F2HI-RYTE 

Z0SF DATA AD,IA,nn s STA #001A “SPACE 
IMRT SPACE) IMCSPACK VIG:SBAcE} ‚SETZEN 

10 DATA 58 i ci VISPACE 











64> 
<298> 


<133> 


«727 

«183> 
<185> 
<188> 
<173> 


<156> 
<2037 
*159> 
<213> 


x178> 


<34> 
x166> 
<233> 
<238> 
<12> 
<68> 
<83> 
<144> 
<b> 


<1B7> 
<108> 


<115> 
<259> 
<207> 
x37> 
<209> 
<a7> 
«60> 
<148> 


“142> 
<215> 


<17> 









<97> 


<15> 


<163> 
<208> 
<219> 


<105> 









> INTERRUPT {SPALE>FREIGEBEN 


315 DATA &0 x RIS PiISPATE 
FZURUECKCSPACE) INSTSPAGEIBASIC - 

325 DATA AD,17,D0 « "IRONEU LDA 80017 NISPACE 
FIRR{SPAGE} IMCSPACE IVICLSPAGEHLESEN ; 
330 DATA 80,197,D0 : STA sDOLYF "SPACE 
FUNDLSPACEILGESCHEN 

525 DATA 29,01 x AND #308 "ISPACE 
$BITCSPACEIOTSPACEIGESETZTISPÄCEIT 

340 DATA DO,07 2 BNE $RASIRQ  "ISPACE 
I=--ISPACEI JA 

345 DATA AD,SD,DE 5 LBA $DCOD "LSPACE 


+NEIN, ESPACE ) DÄNNLSPACEI ICRTSPACEI INTSPACEIDERTS 











350 Data 58 ® CLE WISPACE 
3 INTERRUPT {SPAGCEIFREIGERBEN 

‚355 DATA A0,21,ER g IMP $EAS1 NISPACE 
I+--—= {SPACE INORMALECSPACEITRO-ROUTINE 

360 DATA AD,12,D0 ı RASIRG LDA #0012 BLSPAGE 
YRASTERZEILELSPAGE LADEN 

365 DATA 09,F9  ; CHF #$F9 WESPACE 
IVORLETZTEISPAGEHRASTERZEILETSPACEI? 

370 DATA 50,09 = BCS $UNTEN "ISPACE 
#—--->ISPÄCEIIA 

375 DATA A9, 18 ® LDA #618. NESPACE 


NEIN, (SAACEFDANNTSPACEI ZSTSPAGEIBILDSCHIRMZEILE 
NESPACEIEIN 

380 DATA 8D,11,D0 : STA $DO11 ” 

385 DATA 49,F?7 : LDA ®8F9 
FNAECHSTEN{SFAGEIRASTERZEELEN- INTERRUPT : 
390 DATA 00,07 N ENE SETZEN "tSPACE 
3VORREREITEN{SPAGEHUNDCSPACEI SETZENLSPAGEI-—— ILS 
FACE} IMMER 














395 DATA A913 s UNTEN EDA 331% MISPAGE 
3241SPACEFEILDSCHIRMZEILENTSPACE}EIN 

#00 DATA 8D,11,D0 x STA 0011 nu 

405 DATA A9,00 : LOA #400 P{SPACE 
FNAECHSTEN{SPAGEIRASTERZEILEN-INTERRUFT 

419 DATA 8D,12,N0 s SETZEN STA $D012 "SPACE 
3VORBEREITENTSPACE) UNDESPAGEIBETZEN ; 

415 DATA AC,Bl a z JMP SEAL - "SPACE 





420 : 
425 REM * WRITTEN 19B4 BY WALDEMAR RARZ # 
ENDE DES LISTINGS 


Im nächsten Heft: 


WISPAGE. 






“195> 










<2352> 






<16> 







<6> 







<A8> 










<113> 






<144> 









<70> 






<156> 






<95> 






<203> 






<119> 
<74> 










<76> 







<257 






<68> 
<94> 







632> 







<57> 






<171> 
<223> 
<134> 












Maskiertes POKEN u. a. 


am Beispiel der 
WAIT-ROUTINEN 
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3 
= 
5 
T 
S 
=) 
= 
ı 
C 
H 
E 
R 





Wie oft hat man sich wohl schon 
darüber geärgert, daß man das 
Basic-Programm, welches man ge- 
rade im Speicher hat, erst um- 
ständlich abspeichern und später 
wieder einladen muß, nur weil 
man mal “ganz kurz*.einen Blick 
er ein anderes Programm werfen 
will. 

Besonders ärgerlich ist das für die- 
jenigen, die kein Diskettenlauf- 
werk Ihr Eigen nennen können. 
Nachdem man das Programm 
“Festspeicher“ eingeladen und 
durch SY$49288 ktiviert hat, 'ste- 
hen einem nun zwei neue Basic- 
befehle zur Verfügung, die hier 
Abhilfe schaffen. Wie wohl den 
meisten bekannt ist, überlagert 
das ROM des C-64 ca. 16 KByte 
des RAM-Speichers, den man 
aber nur durch einige, in diesem 
Programm verwendete Tricks 
nutzen kann, Überschreitet das 
Programm, an dem man gerade 
arbeitet, die Länge von 16 KByte 
nicht (nur ganz selten erreicht ein 
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programme 


REM ER RE 


VON THEMAS GLENTHER 


* 
* 
%* 
GERANIENSTR.7 * 
4444 NORDHORN * 

* 

#* 


170 EM AHHHIHIIHHERHTE RE EETT 


188 

118 REM# 

128 REM« FESTSPEICHER 

139 REM«* un nn 

148 REM» 

158 REN#s 

148 REM® r, 

188 # 

198 5 ’ 

1000 REDE HERHIEHNNG 
1qM1B DATA A2,2D sREM Caad LDX #+20 b} 
iv2u DATA AQ„Ba «REM COR2 1DY 401 } 
1854 DATA B9,2R,B9 REM COB4 LDA sauad,Yy 
ıDaR DATA 97,09,58 :REM 0007 STA $AB20,Yr 
1u52 DATA CB :REM COBA INY 3 
1940 DATA DR,F7 ıREM COQB BNE SCHB4 3 
1970 DATA EE,Q6,CB »REM CA@D INGE SCOB6 1 
1@R8 DATA EE,2BF,CH sREM CRIB INC CHR? 3 
1899 DATA CA ıREM C91S DEX 1) 
109 DATA DU,EE ıREM C914 BNE ICaB4 3 
1119 DATA 68 EREM CBi& RTS 1} 
1115 REM 
1128 DATA #5,82 «REM 0817 LDA 402 | 
1138 DATA 198,87 «REM C91F BNE $C024 ı 
1135 REM 
1132 DATA SE,B65,C9 ıREM CiiB STX 2CRa& y 
1158 DATA 60,89,C9 «REN CBIE S5TY 30987 3 
1160 DATA AC,00,CH ıREM CB21 NP SCDaB 3 
1165 HEMER 
1178 DATA BE,B7,CH ıREM C924 STX $C089 3 
1189 DATA 68C,806,68 sREM C927 STY SCaas 39 
1178 DATA 4C,908,C8 :REM LBZA JMP $Cans 
1195 RENuuenuuununne ee 
1208 DATA 78 ıREM CH2D SEI ] 
i21@ DATA Aa,an ıREM CBO2E LDY #$00 |} 
1220 DATA 84,01 :REM C93® STY $B81 F 
1258 DATA #A2,08 sREM CB32 LDX #503 | 
1248 DATA AQ,A® sREM C934 LDVY #sA8 9 
1258 DATA 29,17,C0 ıREM COIS6 JSR $CB17 % 
1258 DATA A2,28 ıREM C939 LDX. #625 ) 
1288 DATA Au,EB rREM ECBSRB LDY #3E8 3 
1270 DATA 298,17,C8 eREM CBH3D JSR 86017 9 
1308 DATA AQ,F7 ıREM Ca4a LDY 0537 1} 
1318 DATA 84,81 ıREM [842 STY seı 1} 
1322 DATA 58 : sREM ca34 GLI » 
1338 DATA 20,33,A5 sREN CB45 JSR 8A533 4 
1348 DATA nR5,22 REM C948 LDA 322 3 
1350 DATA 18 tREH CB4A ELLE 3 
1344 DATA 49,82 ıREN CB4B ADC #582 5 
1378 DATA 85,2D ‚REM 1940 STA $2D ij 
1389 DATA A5,23 sREM CRAF LDA 823 j 
1570 DATA 67,08 sREM 1251 ADC 000 1 
1400 DATA 85,2E sREM CRS5S STA $ZE 7 
1418 IMTA 28,6@,RA6& REM LOS5 JSR SA66Q 5 
1420 DATA 20,73,00 sREM CB5B JSR 808735 % 
1432 DATA 40,AE,A7 REM COSB IMP SATAE Hy 
1433 REM RR 
1448 DATA 28,73,99 ıREM CASE: JSR A073 9 
143543 DATA C9,48 ıREM CH&6i CHP 0340 , 
1460 DATA DB„ID ıREM Ca63 BNE #CB82 9 
1378 DATA 28,73,98 ıREM C9645 JSER #0073 y% 
1488 DATA 09,53 «REM CR6B CHP #853 N} 
1498 DATA DD,97 s»REM CO&A BNE $C075 y 
1900 DATA AY,GE «REM Ca&C LDA #408 , 
1518 DATA 953,92 REM COLE STA #02 1} 
1528 DATA AC,2D0,CH «REM C97D JUMP $CQ2D 3 
1538 DATA CI,AC REM CR73 CHMP ##AC s L 
1548 DATA DB,04 ıREM 6975 BNE $C97B 5 
1558 DATA 85,902 ıREM C977 5TA #02 3 
1558 DATA FO,FS ıREM C977 BER $C978 y 
1574 DATA 538 REM C97B BET 3 
1589 DATA C6,7A ıREM CB7C DEC #7A ' 5 
157@ DATA BB,02 ıREM CO7E BES $CQ82 3 
1608 DATA C&,7B ıREM C5B8R DEC #78 ] 
1&1& DATA 209,79,08 :REM COB2 JSR 30977 4 
1620 DATA 40,E7,A7 :REM CBBS UMP SATE7 7 
1525 REMRHERRERUUREHER U ER A ER 
16838 DATA A9,SE ıREM CAS8 LDA #85E 3 
1544 DATA ED,28,93 3ıREM COBA STA $as0a 3 
1550 DATA AP,CR ıREM CBED. LDA #$Ca 1; 
1648 DATA 8D,89,05 ıREM COBF STA $0309 3 
1570 DATA 68 ıREM C492 RTS 

ul 

YRIR r 


KOPIERRROUTINE. 

ZUANZIBE BLOECKE KOPIEREN. 
ZAEHLER AUF NULL SETZEN. 
ZEICHEN KOPIEREN. 


ZAEHLER ERHOEHEN. 

NOCH NICHT 256 ZEICHEN KOPIERT 7? 
SONST HIGHBYTES IN LDA LIND STA 
BEFEHLEN ERHDEHEN. 

BLOCKZAEHLER DECREMENTIEREN. 
NOCH KEINE 20 BLOECKE KOPIERT 7? 
DOCH, ENDE. 

LOAD / SAVE UNTERSCHEIDUNG, 

FLAG FUER LOAD / SAVE EINLADEN. 
NICHT NULL — ZUR LOAD - ROUTINE. 
SAVE. 

BTARTWERTE FUER BAVE. 


ZUR KUOPIERROUTINE, 
LOAD. 
STARTWERTE FUER LOAD. 


4 ZUR KOPIERROUTINE. 


HAUPTPROSRAMM. 

INTERRUPT VERHINDERN. 

ROM AUSSCHALTEN. 

(PROZESSORPORT)I 

WERTE FUER ERSTE SPEICHERHAELFTE. 
($2B08 - $27FF NACH SAGHBB — SBFFF). 
ZUR FALLUNTERSCHEIDUNG LOAD/SAVE. 
WERTE FUER ZWEITE SPEICHERHAELFTE. 
($200B8 — $47FF NACH SEREB - $FFFF) 
ZUR FALLUNTERSCHEIDUNG LOAD/SAVE. 
RUM NIEDER EINSCHALTEN. 


INTERRUPT WIEDER ZULASSEN. 
BASICZEILEN NEU BINDEN. 

(EBEN AUFGERUFENE ROUTINE LIEFERT 
PRÜGRAMMENDE -2 3 

PROGRAMMENDE NACH #2D / 82E » 


0 


CLR — BEFEHL. 

NAECHSTES ZEICHENHOLEN. 

ZURUECK ZUR INTERPRETERSCHLEIFE. 
NAECHSTEN BASICBEFEHL. AUSFUEHREN. 
NAECHSTES ZEICHEN HOLEN. 
KLAMMERAFFE ? | 
NEIN, ZUR INTERPRETERSCHLEIFE,. 
NAECHSTES ZEICHEN. 

8? 

NEIN, WEITER. 

LOAD / SAVE FLAG NULL SETZEN. 


INS HAUPTPROERAMM. 
? 


NEIN, ZUR INTERPRETERSCHLEIFE. 
LOAD / BAVE FLAG IST BLEICH #40. 
UNBEDINGTER SPRUNG. 

BASICZEIGER UM EINS DECREMENTIEREN. 


LETZTES ZEICHEN HOLEN. 

BEFEHL AUSFUEHREN. 

NEUE. BEFEHLE INITIALISIEREN. 
VEKTOR FUER NEUEN BEFEHL AUS — 
FUEHREN AUF $CASE GETZEN. 


; PROBRANMENDE. 


REMEARSSSRSERRHRREHIHIHIHIHHHE HIERHER REES 


GCompube mi 


r 


] 
| 
| 
“ 























Basicprogramm diese Länge), 9020 : POKESI200,9ı POKESSZB1,ASPRINTTIH EINEN AUBENBLECK BITTE: DIE DATEN" # 
Be Ss ugschtden Balakt IOIO a S-Bı PRINT" LPRINT” WERDEN ZUNAECHST EINBELESEN !" sFOR N=® TO 146: 
(Kl 5% d 9948 » READ A$ a R$= LEFTS(AS,1) 3 C$= HIDSLAR,2,13 7 F$=B$ :G0SUB 9580 ıB=F ı 
ammeraff unter das Fast 3 F$=C$ = GOSUB 9508 s CaF ı AstBris)4o ı Gem 0 POKE N+49152,A s NEXT Nr 
ROM abspeichern. BER x IF 5<>15385 THEN PRINT®L FEHLER IN DATAS !" sEND: 
Nun kann man ein Programm be- 9870 ; PRINT" ERENEm . _NASCHINENCODE ABBPEICHERN? "ıBET A® : IFAte" "THENFQTRL 
Eee schen und sich tl 9078 ; IFA@="I"THENOPENM ,B,1,".F-SPEICHER"APRINT#1 „HRS {O) CHRF (192) 1a GOTOFLIM: 
Aukaben srl Wil 7168 s PRINTLMEDEDEE DAS PRODERAMM IST NUN BETRIERSBEREIT!" a sEND: 
ren Aulgaben wıdmen. Wıll man Fi1B = FOR N= G TO 146 «PRINT#1 ,CHRSIPEEKIN+49152)) 5 NEXT N ıCLOSEI 160TDF10Bı 
sein altes Programm wiederha- 7140 ı 5 u 
ben, holt man es durch “Klam- FSU REM Ar EEE RER RBIE SEEN RN IE RE REDEN REDE ARE HEHE DEE EA AEREEH 
eek Kilo 9518 : IF FF="A" THEN Feri@" + REN # HER — DEZIMAL UMWANDLUNGSTABELLE # . 
meraffe)L: ac Übrigens darf 9328 ı IF FS="B" THEN Fe"il" 2 REM * N, 
man auch angere Programme be- 4338 ı IF F$="C" THEN FS="12" 3 REM o # DIE MIT DIESEM PROGRAMM “4 
denkenlos abspeichern, wenn die 9548 ı IF F$="D" THEN FSe"t3" ı REM # GABGESPEICHERTE VERSION MUSS 8 
Programme, die man danach ein- Ba s IF F$e"E” THEN FS="14" 6 REM * ABSOLUT GELADEN WERDEN. “oo. 
Br n 5 a IF F$="F" THEN Feti5® 2 REM # AKTIVIEREN MIT SYS 49288 “8 
= enisprechend ep u 9570 8 F=VALIF$) SRETURN s.REM # ch) 1786 YON THOMAS BUENTHER “oo: 
er Dasıc-Lader gibt ım Nbrıgen 9580 REMIS SERSIÄHRRRIGHIHI HIHI ARIESHRENEAHRENE BEER BEAT BHÄTHRT RER RE AH 
den erzeugten Maschinencode auf 9585 REM= “ 
ein Diskettenlaufwerk aus. Arbei- » Ark Aa DAS AKTUELLE BASICPROERAMM KANN DURCH @5 ABGESPEICHERT WERDEN. “ 
tet man mit einer Datasette, muß ki ; = 
ee ? i Var 7528 REM» LLE BABICPROGRAMM KANN DURCH NBELADEN WERDEN. 
in Zeile 9090 die Geräteadresse ım 9610 REM» er - me a z 
OPEN-Befehl von 8 auf 1 geän- FOZU REM ER NENAEEHTESERERIENSEREHENHIENE HB BEHRENS 


dert werden. 


READY. 





IT 


Schneider 








"Ziel des Spiel ist es, möglichst vie 


le FIREHEADS abzuschießen 
und dabei zu verhindern, selbst 
Treffer einstecken zu müssen. 


‘Nach dem Anfangsbild gelangen 


Sie in ein Menü, in dem der Level 
gewählt werden kann. Dann wird 
das Spielbild aufgebaut. Der 
freundlich lächelnde Abenteuerer 
steht irı der Mitte auf einer Ram- 
pe. Nach einem beliebigen Ta- 
stendruck geht es sofort {und ab 
Level 3 auch sehr schnell) los. Auf 
der Rampe rasen FIREHEADS 
hin und her, die es abzuschießen 
ei Dabei wird man von schnel- 
en Raketen und sogenannten 


Ramrpern, die man nicht abschie- 


ßen kann, gestört. Vorsicht: 


OMEGANEA 





Sie haben nur einen begrenzten 
Aktionsradius. Punkte erhalten 
Sie für einen guten Abschuß oder 
ein erfolgreiches Lenkmanöver. 


Bei einem kleinen Crash und bei 

Fehlschüssen wird Energie abge- 

zogen, die bei Spielbeginn 100 

Einheiten berrägt. Ist die Energie 

E Null, ist auch das Spiel been- 
18 


Hat man mehr als 10.000 Punkte 
erreicht, wird die Anzeige auf 
Null gesetzt. Die Punkte gehen 
natürlich nicht verloren, sondern 
werden nur zwischengespeichert 
und tauchen wieder auf, wenn 
man sich in die Bestenliste ein- 
reiht. 





SCHNEIDER LISTING MIT THECKSUMMEN 


v2.0 
1BUO "m nn nn nn 
1019 ——-—- DMERANEA 
{c} November 1984 by Alexa 
nder Stroh === 
1020 mann nennen 





onen 


1250 ’ VORSPANN 

ıBa@ MEMORY &BFFFIFOKE &BDEE BE 
F:CchAt BRAT:CALL &BCU2 

1050 IF PEEK (KANBA)<>&C9 THEN L 
OAD"sb.bin”" „SABBESCALL EAN 


tJD} 
{313 


{MI 
{mm} 


125B IF PEEK(&IBBN)<HZ2AB THEN L 
ÜAD*"sprites,.bin” „IHR 

187 MÜDE 1:.BORDER B:G0SUB 26998 
:PAPER B:CL8 H 

1089 DEFINT arzsDIM # (28,25) ,n$ 
119) „d$t10) „st1B) „vi2),r (2) 

1098 DEF FNn(n„y)=TESTiIn#352-24, 
149 -2#y) a0) +TESTR (32,0) +TESTIR BO 
„189 HTESTRI-32,0 

11089 ENT 1,18,3,1,2,-2,1,3,15,1 
zENT 2,4,930,2,5,13, 1,3, 30,1 
11104 ENT 3,5,29,1,19,15,2,39,-18 
+3: ENT 4,90,5,21ENV 1,59,29,1,10 
‚15,2 

112@ KEY 148, "eode Zıpaper RB:pe 
n Lzlist"+CHRFLISI:KEY DEF 66,1 
Fr.) 


Computbe mik 


{BC} 


10F} 
{Bf} 


<PC} 


ke} 


1138 OPENIN"topten1.Fi1"ıFÜR 1- 


i 10 191 INPUT#F,.n$ cr} tor} 
1139 INPUTRF,St1)ı INPUTAF,AFL1) 
ıNEXTECLDSEINSELS {ng} 
1154 SYMBOL 248,4,0,1,3,7,18,51 
‚53:8YMB0L 241,02,90,128,192,224, 
240,248,252 FH} 
1168 SYMBOL 242,63,31,15,7,3,1R 
SYMBOL 243,252,248,240,224 192, 
128 . [11707 
1178 BYMBOL 244,0,0,0,841,3,7,8 
Sı5YMBOL 245,4,0,2,8,128,192,22 
4,248 tAG} 
11808 SYMAN. 244,195,7,3, 13 5YMBUL 
247,248,224,192,128 {LE} 
1190 SYMBOL 248,8,8,9,0,8,0,1,3 
ıSYMBIL, 249,0,8,9,98,0,9,128,192 {GH} 
5187 


1720 SYMBOL 250,%3,1sSYMBOL 251, 
192,128 

1210 !5YM,248,249,8,8,10,259,259 
1,9: 1SYM,244 ,245,8,8,10,2468,247 
1 

” 

1229 15YM,298,241,8,8,10,242,24 

3,2: 18YM,2143,215,8,8,18,213,212 
3 

v 

1239 I5YM,46,69,71,4: 19YM,45,58 
‚B&,5:18YM,09,82,77,6. 

1248 ° TI TLEBIALD 

1259 PEN 13LUCATE 17,2 PRINT"OM 

EGANEA”"IPEN 2:LOCATE 19,4:PRINT 
CHREK1HA) +". by" 

1250 PEN SILOCcATE 16,5:PRINT’SU 

PRA-SOFT" 

1278 PEN ZıPRINT:FRINT 

1280 PRINT" Now it'= time for p 
laying famous games,";5 

1294 PRINT” so it's also time f 

or fighting against" 

1308 PRINT" OMEGSANEA.* 

1310 PEN 3sPRINT 

1328 PRINT" Beware of all RÜCKE 

18 and RAMMERS. Try” 

13380 PRINT" to destroy the FIRE 

HEADS or you won't“ 

1348 PRINT" be satisfied at all 
” 


135@ PEN 2:FRINT 

1560 PRINT" Use JOYSTICK/CURSOR 

S$ to control your" 

1578 PRINT" ship. Press any key 
to continue and se-"j 

1588 PRINT” lect fighting-level 
" E 


15392 PEN 1ıL0CATE 16,22 

1492 FRINT"Gond. luck!" 

1418 INK 1,25: INK 2,61 INK 3,2: W 
HILE INKEYSSI"*TWEND: IPEY- 

1429 ' Select 

1438 MODE 1: INK 1,0:PEN 1=:CALL 

&BD17 5 

1448 LUOCATE 15,9s5PRINT’SKILL LE 
VEL;" 

1458 LSCATE: 9, I13CHINTPBESINNER 


=— mn 


1458 LOCATE 9, 13: ERLNT ONV 


1489 CALL De ne 1,26. 

1498 a=ASC CENKEVS+CHRF MiılF a 
<49 OR a>51 THEN 1498 ELSE levr 

a-48 ) 

1504 DLS:MODE Br6GOSUG 24783 INT, 
1 

1518 ’SEREEN i 

1528 IOUAD,1,5,23,25,259: QUAD, 

8,13,23,25,2551 IQUAD, 14,28,25,2 

5,255 

1538 PEN 13:LDEATE 6,25 

1548 PRINT CHREt2I2ICHRELLLICHR 

$1B)CHREL143I CHR$ 11) CHRS (BICHR 
$1143) 

1558 PAPER 1@:LUCATE &,22:PRENT 
CHR$ (214) 3 LOCATE 135,22 

1569 PRINT CHRFCZISICHRFLLBICHR 

FLBICHRE (LAS) CHRE (LBICHRFIBICHR 
+(143) 

1579 PAPER BrLOCATE 15,251 PRINT 
CHR$ (2135) 

1592 PEN IQ: LOCATE 1,22: FRINT C 

HR$(Z1A4ICHREC1AFICHR$ (145) CHRSL 
143)CHRF (143) 

1590 LOCATE 8,22>3PRINT THR$ 1214 
ICHRE (143) CHRS (143) CHRFLLSFICHR 

SILASICHRE (215) 

1608 LOCATE 15,22: PRINT CHR$(14 
SICHRS CLAZIEHRFLIATICHRFCIAZICH 
RF(215) h 

1818 PAPER 15:L0OCATE 28,20sPRIN 
T ECHR$t17)=PAPER 13:PEN 1B:LOCA 
TE 2,89 

1628 PRINT CHR$(2L4) ,5TRINGS (16 
143) JCHR$ (2155 5x IINVAFOR 1=9 7 


{LL} 


{mA} 


{ED} 


{on} 
{IE} 


{DC} 
tpL}+ 


gar} 
<LM} 
{AI} 
{EL} 
ar} 
Pc} 


{CF} 
{FO} 


{KM} 
MI? 
13H} 
10m} 
tBN} 


{NE} 
{ED} 


{8x}. 


{BEN} 
{JD3 
{BF} 
1303 
TON? 
1603 


<CB} 
{AA} 


{91} 


{MB} 


{LF} 


{FE} 


{DA 


{NM} 


{HH} 


iKE} 


{pn} 


0 1B:LUOCATE 2,1 

1830 PRINT CHRFL1AFI :LOCATE 19, 
1:PRINT CHR${143) s NEXTIFINVE LOC 

ATE 1,8 

1640 PRINT CHRECIASICHRSIZIZI 2L 

OCATE 19,B: PRINT CHRSTZIFSICHREC 
145} 1PEN 15 

1658 FOR 1=9 TO 28:L0OCATE 1,1:P 

RINT CHR$(143) :LDOCATE 28,15PRIN 

T ECHR$F(143I 1NEXNT 

1668 PFAPER- 1SIPEN WeLOCATE 1,29 
ıPRINT"E: @R":LOCATE 9,24: PRINT 
"P: ma" 

1678 LOCATE 16,24: PRINT"S=:"a IPI 

CO,18,24 ,0,3-45 

1668 'HAUPTPROGRAM 

M 

16598 x=1Bıy=>3:1ivetßß: p=9: zp=Bı 

liut=Bs cet=B 

1782 GOSUB 25898160548 261084 !SPR 
ITE,xıyv,B 

1718 ON tiev 6DEUB 2830, 2450,267 

Br tPEY 

1729 »i=xıyleyılF liut=1 THEN 2 

2098 

1738 IF INKEY{EIXKOR INKEY(74) TH 

EN x=x-1ıb=1 

1748 IF INKEYILIKOR INKEY(7SITH 

EN x=x+lıb=1 

1758 IF INKEY{BIXOR INKEY (72) TH 

EN y-y-1:b=1 

1745B IF INKEYIZIXOR INKEYI7HTH 

EN y-yt1:b=1 

1778 d=ed-iriF d<B® THEN IF INKEY 
(P}KXOR INKEYI7E)ITHEN she 

1780 IF x<7 THEN x=7 ELSE IF x»> 
13 THEN x=13 

1798 IF y<2 THEN y=aZ2 ELSE IF y> 

& THEN y=4 

1808 IF b=1 THEN b=Os ISPRITE,ri 
,y1,15 

isıa tSPRITE,x,y,@:IF sh=8 THEN 
1858 ELSE sh=&:d=-iB-1ev#3 

1828 a=xr32:b=125-y)#14:rl0VE a, 

B:DRAU 3,1358, 14:CALL KBDI9TSOUN 

D 2,19,15,7,8,2 : 
1020 IF TESTia,126)<>@ THEN 803 

= 217@ ELSE liv=eliv-116G08UR 22 

1949 DRAR a,b,d:EAlL 5BD19 

1052 IF set=-B THEN 1878 

1842 ON num. 6070 1899,1739,1998 
‚2248, 2099 ,2878 ‚20978 ,2899 

1978 IF pse>B THEN pse=spse-1160 

T0 1728 ELSE num=-RND*B: pse=äRt3 


'-l1ev):50TO 1868 


1088 * l1-rocket 

18990 IF set=B THEN set=1:v=-3:m= 
y+x-3:50UND 4,59,42,6,0,4 

1908 ISPRITE,v W153 vev+1lenzwri 
sIF wi THEN set=A:p=p+15:GUSUB 
2589:60T0 1728 

1910 IF FNntv,w}>B THEN Livaliv. 
-2: GOSUB 27259: G0OTO. 1850 

1928 tSPRITE,v,#,2160170 1728 
1938 * r-rocket 

1748 IF set=B THEN set=1,v=17ın 
=y+17-x:50UND 4,59,40,6,0,4 
1959 ISFRITE,v,n,15:vev-lıeen—i 
stIF w=1 THEN set=0:p=p+15:16DSUB 
2580: 60170 1720 

194B IF FNntvw,wI>Q@ THEN Liveliv 
-2:G0SUB 2258: B0T0O 1850 
1978 ISPRITE,v,#,33G0T0 
178a * 1-ranner 

1990 IF set=B THEN set=1yvelaws 


1728 


"y:SDUND 4,1156,70,15,1,4 


2888 ISPRITE,v3w, 15: vey+tlıIF ve 


20 THEN setsfıp=p+2Bı50SUB 2388. 


:G0OTO 1729 
2013 IF FNniv+1,Ww)>0 THEN Ii1v=l 


'iv-2:G05UB 2258 G0T0 1859 


2029 1SPRITE,v,#,4:G070 1720 
20594 *°.r-ramner 

2048 IF set=B THEN set=1ı velfem 
=»y:SOUND 4,1156,70,15,1,4 


CSompute mib 


t0C} 


{PM} 


{FO> 


{HE} 


{BA} 
{61} 
{FR} 
{CH} 
{HB} 
<AN} 
{JE} 
{HG} 
{ID} 
ns} 
{Fo} 
{IN} 


cc} 
ter 
FR} 
tJ3P3 
{HB} 
AR} 


ILL} 


{LF} 
{LP} 
{JK} 
<rir} 


{PT} 


{FI} 
{LO} 
{01} 
MC} 


{DF} 


kC} 
KA} 
OK} 
zaoL} 


{PO} 


programme 


2059 ISPRITE,vın, 15ıv=v-1s If vo 
B THEN set=8:p=p+28:GU5UB 25891 
60170 1728 

2058 IF FNntv-1,Ww3>8 THEN Livel 
iv-2:GOSUR 2259:G0TD 1958 

2976 tSPRITE,v,w,5:60T0 1728 
Ze8R ' firehead 

2878 IR set=B THEN set=1:IF RND 
>9.5 THEN v-Jıvr=1 ELSE val7ıve 

1 

z1i88 ISPRETE,v,17,15rv=vWwrılF 
v=2 DR: v=18 THEN set=B:160T0 172 
L'] 

zı18 ISPRITE,v,17,11IF RND>Lev* 

9.88 THEN 2:58 

z120 a=sv#324b=125-y)#14+B: MOVE 
a,136:DRAW a,b,14 

2138 CALL #BD1I:SOUND 1,12,12,7 
‚B,1:IF v=n THEN cr=1 

2190 DRAW a,135,8:CALL &BD19ı IF 
er=i THEN 11 veliv-4ı60SUB 2258 
rset=1 

215A GOTO 1729 

2160 °S8PLIELROUTINE 

N 

2178 * Treffer 

2188 ISPRITE,v,17,15:DRAW a,b,d 
str=U7set=U: PAPER BO 

2198 FOR 1-9 TO Sı IPICO,v,17,14 
sl: NEXT 

220% FOR I=3 TO @ STEP-1: IPICO, 

v,17,14,11NEXT« ISPRITE,v,17,15 

2212 FOR 1=1 TO 12 STEP 3:50UND 
2,8,18,15, 7, 13NEKT . 
2228 FOR 1=15 Tü 8 STEP-1150UND 
2,8,18,1,„„iSeNEXT 

2238 FAPER 1S:PEN Bıp=p+5g: GOSLU 
B 2580: RETURN 

2249 *. Gerammt 

2258 SQUND 2,5,28,7,98,3,31ıset= 

Bscr=Wrliv=li1v-l 

2268 IF Iivi=®@ THEN 1iut=1 ELSE 
GOSUB 2818 

227@ RETURN 

2288 ” Ende =. 

2294 liv-B: 60SlB 2610: PAPER 0:1 

F nunf5 AND set=1 THENISPRITE,Yv 
‚w,15 

25@A INI,IEFDR 1=0 TO Sı RICO," 
Pa 14,13 NEXT 

2318 FOR 1=3 IQ ® STEP-1: !PICH, 

Kıy,)id, l1NEXT- 

2328 !SPRITE,n,yY1iSsFÜR 1-1 TO 
12 STEP SıSOUND 2,8,18,15, 4 ,1:N 
EXT 

23390 FOR 1=15 TO 8 STEP-1:SOUND 
2,8,15,1,,,453NEXTı INI „24 CLSr I 
NK 1,26 

2348 INI„ZıWHILE INKEYS<>""zWEN 
D:IF zp+p<=sti@)THEN 2408 ELSE 
stiM)=zp+p 

23580 MODE 11PEN 1:PRINT"I’m sur 

prised!"z INI,t:PRINTLPRINT"Thi® 
was well done." 

2569 INI,„I:PRINTEPRINT"Nice to 

see you here in the TOP .TEN.* 

2378 LOCATE 1,7rINPUT"What's yo 


ur nane,hahrinst 19) 


2380 IF LENIn#(IM)=@ THEN n#t1 
B)>="LUNKNOSWN PLAYERI" 

2378 IF LEN(n$(18)3<17 THEN 241 
8 

2488 LOCATE 23,7:PRINT SPACE$ (1 
8133PRINT SPALES (I@) ;sQOOTO 2374 
2410 LOCATE 1,9: INPUT"OR,And th 

e day of scoring"zd$(1®) 

2420 IF LEN(dFStIM))=18 THEN 244 

LOCATE 28,9: PRINT SPACEF(13) 5 
sG0OTO 2410 j 

2430 LOCATE 28,9:PRINT SPACEFLI 
SzsPRINT SPALES (AU), :GOTO 24:0 
2449 PRINT=PRINT"Thank yau! Now 
we’ll see your position. "s INI, 

2 


.2459 FOR i1=2 TO 1: FOR m=iR TO 
'ı STEP-tılF stm) >5sim-1) THEN G08 


{0A} 
{CP} 


JA 
cp} 


{DH} 


{Fk} 
{DM} 
10m} 
{BB} 
tıEı 
{PN} 


{FC} 
{CH} 


{IN} 
£{DN} 
{9} 
{11} 
iBB} 


ICH} 
{EM} 


t1D>. 


{LK} 
{CH} 
{FH} 
{LE} 
{293 
tif 


{AL} 
{Ko} 
{AF} 


TEN} 
LO} 
tK> 
in} 
{BG} 
{10} 
{HM} 


{FB} 


<PG} 


{EN} 


51 





























Programme 


UB 2470 

2459 NEXT m,1lı60T0 2488 

2478 tEX,3,.n% Cm} ‚An&(m-i)z EX, 
S,@dr(m) ‚edsiam-1}ı IEX,2,8s im) „& 
sim-1) aRETURN 

2488 EL5:G0SUB 2538: CL82LOCATE 
13,131 PRINT"NEXT GAME tY/N) 7?" 
2438 IF INKEY{43}>-1 THEN 1438 ' 
ELSE IF INKEY(46)>-1 THEN 2509 
ELBE 2498 

2508 OPENDUT"toptent.Fil"eFOR 1 
=1 TO 18: PRINT#9 ,n${1)ıPRINTEF, 
Bil) 

2518 FRINT#9?,4$t1) ı NEXKTICLOBEOU 
Tır$="topteni.bak"ı JERA,er$ı INI 
+53 IBASIC y 

2528 ' Hall of fame 

2559 MODE 11PEN 14LOCATE 13,1:P 
RINT"THE HALL OF FAME" 

2544 FOR 1=1 1D 1dıl1-2+1#2:L0C 
ATE 1,11: PRINT n$t1):LDCATE 18, 
11 

2558 PRINT sl) 1ıLÜCATE S1,112PR 
INT d&tL I ENEXTILUCATE 14,25 
2548 PRINT"Press any keya"ıWHIL 
E INKEY$< }""sWEND: IPEY: RETURN 
2578 ‘ Punkte 

258BD IF p<10009 THEN 2398 ELBE 
IF zp=8 THEN zp=psp=B 

2578 LOTCATE 19,24:PRINT USING" 
KH’ ypzaRETURN 

2604 * Lives ; 

2618 LOCATE 3,24=PRINT USING"HR 
#"1141vjJ 2RETURN 

2629 * Level-colors I 
2658 INK 1,6: INK 2,63 INK 3,2411 
NK 4,6: INK 6,2: INK 7,6r INK 10,2 
sıINnK 12,& 

2649 INK 13,21:INK 14,24: INK 15, 
13:RETURN i 

2650 INK 1,18: INK 2,183 INK 3,24 
INK 4,18: INK 4,2:INK 7,181 INK 
10,4 INK 12,18 

2658 INK 15,B2INK 14,2 INK 15,1 
T:RETURN 

2678 INK 1,2: INK 2,2: INK 3,2411 
NK A,22INK 6,5: INK 7,2: INK 10,7 
sINK 172,2 

2489 INK 215,22: INK 14,4: INK 15, 
48: RETURN 

269m * INKs aus 

2729 FOR I" TO 15:INK 1,BsNEXT 
RETURN 


ENDE DES LISTINGS 


LK} 
{KF} 
{BE} 
<cH} 


{Ko} 
{PH} 
{ML} 


ED} 
AJ} 


{FF} 
if} 


{rd.3 
{DB} 


IBN} 


{8} 
{HF} 


<D1} 
1187 


{18} 


wLı 
4HD} 


(21) 


SCHNEIDER LISTINB MIT CHECKSIMNEN 








v2.8 
LoOB '--—--—— Su au 
1810 '--— (ce) Septenber 1964 
By. ee 
1820 '-— Alexander Stroh 
1BFEB 9 menu ann m mm man mn nn nn 
1848 MEMORY KAFFFICALL &0C92:DE 
FINT a-z E 
1058 RESTORE 1928 
1058 FOR i=UABEN TO &AID?:READ 
as 
10878 am VALC"&"ta$)POKE i,asNERN 
T 
1292 DATA B1,0#,20,21,02,ni,cd, 
di,be,3e 
1270 DATA c9,32,08,20,07,72,al, 
*3,04,al 
1100 DATA c3,51,0l,c3,63,alyc3, 
74,al,c 


1112 DATA 85,21,c3,b@,ai,c3,bey, 
al,c’,d? 


{103 
mp} 
{66} 
565} 


{L0> 
00} 


{JE} 
<or} 
{EL} 
{PA} 
tc1} 
<CcK} 


1129 DATA al1,c3,e7,21,03,#7,21, 
c3,10,32 
1139 vATA 
39,32,€03 
11439 DATA 
a8,03,73 
11582 DATA 
e3,ea,a% 
1140 DATA 
Ac,ad,c$ 
1179 DATA 74,84,23,82,24,03,71, 
ad,c!,7a 
11809 DATA 
c3,cH,a4 
117A DATA 
ı200 DATA 
52,55,4e 
1219 DATA 
497,55,358 
1228 DATA 
46,41,33 
12359 MTA 
47,4 ,ce 
12994 DATA 
534,55,32 
1259 DATA 
55,41,c4 
1258 DATA 
54,93,c8 
1278 DATA 96,99,45,9c ,c24,45,d00, 
53,57,cd 
12885 DATA 
4c,46,49 
1294 DATA 
4 ,57,c® 
130B DATA 
53,48,4# 
1318 DATA 
EEE Tr 
1328 DATA 
43,41,4c 
1338 DATA 
‚0,90,0,0 
1549 DATA 
eu,a5,eb 
1358 DATA 
0B,98,19 
1568 DATA 
25,24,c3 
1378 DATA 
86,05,1e 
13988 DATA 
13,45, 11 
1398 DATA 
c9,eä,cd 
41408 DATA 
al,et,2c 
1418 DATA 
e0,28,a1 
1425 DATA 
20,ac,af 
1439 DATA 
81,c9,fe 
1448 DATA 
11,08,48 
1458 DATA 
28,c2,04 
1458B DATA 
81,00,48 
1478 DATA 
»5,32,01 
1488 DATA 
€d,94,bb 
1498 DATA 
bc,0cd,88 
1504 DATA 
ed,45,bb 
1514 DATA 
2B,c2,08 
1528 DATA 
68,bc,c9 
1538 DATA 
bb,20,04 
1549 DATA 
cd,B6,be 
1559 DATA 


e3,58,22,03,72,a2,c3, 
17,23,035,37 ,a3,c3, #4, 
a3,c3,74,23,03,20,a5, 


23,194,48,03,50,a4,03, 


84,23,59,24,c3,br,a4, 


c’,ce,a#,00 
53,50,52,49,54,:5,43, 


43,c8,43,4# ,58,09,44, 
4c,41,d7,48,45,4c,J8, 
d4,32,91 ,4e,ch,42,27, 
42,49,47 ,4# ,45,06,524 
ce,40,54,55,52400,51, 
242,59,05,53,34,52,45, 


m.47,43,cH ‚45,53,d7, 
ca,dc 246,48 ,55,d4,57, 
37.,55,48,48,47,44,05, 
47 ,54,32,91 ‚dB,49,4e; 
46 ,05,48,.09,50,45,49, 
cd,40,3# ,49,53,c5,0,8 
00,28,D2,BR,fe,05,c2, 
96,97 ,29,10,#d,eb,21, 
wu ‚dd ,66,DA,dd,0m,02, 
Sa,at ‚ed,1a,bc,02,08, 
77,13,23,18,f4,12,77, 
#d,87,19,41,2d,28,ec, 
20,a1 ,@1,24,05,cd,28, 
25,085,64,208,at ,ei,2%#, 
c9,70,00,c2,00,a5,21, 
be ,28,03,35,00,c9,36, 
09,c2,08,25,21,08,-0, 
201,00,48,2d,b8,c9,te, 
a5,21,08,49,11,090,c0, 
ed,bB,c9,te,08,c2,08, 
ed,Be,bc,cd,@2,bce,af, 
32,01 ‚ed, 90,bb,cd,14, 
bp,2d,83,bb,cd,hö,bc, 
3a,03,32,ee,bd,c9,fe, 
a3,3e,0b,21,5%,08,cd, 
tn,B1,c2,90,25, 32,81, 
3e,c0,18,02,38,40,47, 


78,32,cb,b1,c7,t8,20, 


GSompute mik 


CHB) 
IKN? 
[c= 67 
{LB} 
<GM} 
XKP} 


cKJ3 
{HN} 


{MR} 
AI3 
{0} 
m) 
{NJ} 
<0B} 
wo} 
<ME} 


{DH} 
uL> 
kB) 
kp} 
Im) 


NL} 
{IL) 
{FD} 
{CK} 
£KK} 
{043 
£IN} 
{HF} 


{D6+ 


t0I} 
{GI} 
{ADC} 
kp} 
173 
{F0} 
£{LM) 
{KB} 
ur} 


tIF3 


c2,80,35 
1558 DATA 
32,l1e,a1 
1578 DATA 
25,32,Bb 
1588 DATA 
fe ,‚Bd,ca 
1599 DATA 
44 ,c8,19 
1683 DATA 
4 ,28,1a 
1518 DATA 
c1,18,e@ 
1624 DATA 
ca,0B,a5 
1630 DATA 
19,05,0B 
1448 DATA 
ia,ed,b8 
145P DATA 
en,f1,3d 
1459 DATA 
dd,22,dd 
1478 DATA 
#4,34,5d 
1689 DATA 
09,25,7b 
16979 DATA 
56,86 ,dd 
1709 DATA 
44,bc,c7 
171@ DATA 
al,cd,88 
17228 DATA 
77,23,18 
1738 DATA 
78,0d,5a 
1748 DATA 
83,0d,75 
1758 DATA 
43,28,31 
1760 DATA 
00,35, 7b 
1778 DATA 
65,04,25 
1788 DATA 
38,19,22 
1798 DATA 
di ,35e,02 
1808 DATA 
Ve,24.06 
i81@ DATA 
ed,42,77 
1828 DATA 
A511, 
18359 DATA 
09,29,edJ 
1849 DATA 
01,28,07 
1858 DATA 
s2,eb,2a 
1852 DATA 
e1,24,dd 
1678 DATA 
e2, 08,25 
18098 DATA 
dd,66,04 
1890 DATA 
82,eb,77 
1909 DATA 
te,85,0c2 
19180 DATA 
9@2,dd,45 
19238 DATA 
23,10,87 
19398 DATA 
35,0f,67 
1942 DATA 
211,18,98 
1952 DATA 
26h ,dd,23 
19658 DATA 
te,04,c2 
1978 DATA 
94 ,cd,75 


32,87,32,0b,al,35e,3a, 
c9,18,28,c2,00,35,38, 
31,38,28,32,12,a1,09, 
40,25, 75,0d,43,82, 11, 
06, BB,c5,85,d1,26,81, 
ad,bE,12,01,50,.28,0%9, 
f1,59,28,2B,c7,fe,08, 
#5,0c4,43,42,11,80,cD0, 
c5,25,41,23,01,46,08, 
12,01 ,b60,87,89,c1,10, 
29,28,c9,dd,de,00,2d, 
23,08 ,67,06,04,29,18, 
29,29,19,09,48,05,c2%, 
g4d,50,02,dd,de,N4,dd, 
66 ,Q0,1d,15,25,2d,cH, 
fe,00,c2,00,05,cd,da, 
2,07 ,Ob,ft,21 ‚20,28, 
66469 21,9 132,86, dc, 
bb,23,18,79,26,01 ,2e, 
bb,c9,28,32,41,533,47, 
Ze, 38,04,Ba,fe,05,c2, 
32,76,35,dd,68,02,ddy 
2d,@5,c4,13,b0,11,98, 
72,25,11,59,80,25,19, 
32,74,83,00,21,74,35, 
84,18,77,-.5,21,09,08, 
ed,42,014,23,13,10,70, 
10,e4,52,d1 ,eb,c5,Bl, 
42,c1,2b,2b,2b,2b,eb, 
23,72,25,11,00,20,ed, 
72,25,4d,35,2B,20,c4, 
35,02,24,33,c97,fe,03, 
cd,78,bb,e5,dd,62,02, 
©d,75,bb,2d,60,6b,39,; 
wi „26,90 .0d,75,bb,c9, 
08,8%,dd,66,95 ,dd,&e, 
04,98,12,77,79,12,13, 
9,57 ,3e,20,ba,fa,@0, 
66,06,05,29,190,#0,92, 
19,05,00,d4d,7e,82,77, 
4 ,23,20,45,08,77,69, 
00,35,dd,66,84,,dd,se, 


1788 DATA bb,dd,7e,02,cd,90,bb, 


tun 
16K} 
{LF) 
KH) 
cr} 
{AK} 
13m) 
{513 
(P13 
tKP) 
{PF3 
<DM2 
Kr} 
cKP}. 
{KI> 
{AD} 
{DM} 
<18}3 
(BL) 
tDF} 
{NB} 
{BF} 
{HAY 











Programme 








a#,67,6b {FA} | 2140 DATA 68,04 ,dd,56,04,dd,46, 00,02,00 tLN) 
1998 DATA 95,925,29,10,fd,11,00, 88,13d,15 {D6) | 2308 DATA a9,cd,18,bb,c9,fe,00, 
99,197,06 <N33 | 2158 DATA 25,2d4,0d,59,br ,c9,#o, c2,89,35 {EP 
2020 DATA 20,7e,cd,5a3,bb,23,10, 95,c2,08 {ar} | 2310 DATA cdH,b6,br,c9,te,80,c2, 
+9,09, fe iFH} | 2168 DATA 2a5,06,01,76,dd,5e,82, 9,35,c0 {BL} 
201® DATA 80,ca,20,25,F5,28,67, dd,4e,04 {DM} | 2328 DATA b9,bc,c9,00 tKEI 
dd,se,dm : {AB} | 217@ DATA dd,56,R2,dd,64,BR,id, 2338 RESTORE 2359 <0M} 
2020 DATA 85,05,29,18,fd,11,02, ' |15,25,2d {LB} | 2348 FÜR iwEASOB TO SASIE:READ 
794,19,06 {HK} | 2188 DATA cd ,58,br,c9, fe,00,02, as {ER} 
20350 DATA 29,77,23,198, fc ,dd,23, 00,35,21 AMF} | 2350 awVALt"K"+as)sPOKE i,arNnEK 
dd,23,#2 {ND} | 2198 DATA B1,a0,11,95,2u,12,77, T {BJ 
2049 DATA 3d,20,e3,c9,fe,02,42, 15,23, 1a» {NL} | 2348 DATA 21,09,05,70,f8,Q0,cB, 
BB,aö,fe {PN} | 2209 DATA 77,1,5b,B1l,ae,23,76b, cd,Sa,bb iFB} 
2050 DATA @1,20,14,32,180,12,eb, ae, ad,S2 x {CD} | 2378 DATA 23,18,46,4# ,70,65,72, 
23,58,23 41} | 22Z1R DATA eb,28,7b,ae,af,77,42, 61,60,64 {IN} 
2060 DATA 36,21,87,b8,25, 10,70; Ab „e5,di ta0? | 2348 DATA 20,&1,49,73,74,61,6b, 
12,25413 2 {mE} | 2220 DATA 16 ,ed,b9,c9,fe,09,c2, 65,84,0d 10M) 
2078 DATA 19,fa,c9,21,87,b9,86, 00,35,21 {kJ} | 2399 DATA 08 {BB} 
19,7a,rd 48H} | 7238 DATA 81 ,a2, 36,68 ,23,54,01, BEE mm unteren testrn nenne —— 
2088 DATA Sa,bb,23,10,89,69, fe, 9, OKI 5 mn {6039 
82,72,08 {LM} | 7240 DATA ©2,08,35,38, lö,cd,Sa, 2418 "Direkt hinter dem TER} 
2090 DATA 085,10,01,28,14,30,10, bb,7b,.cd CF} | 2428 "Hauptprogramm savens XDN} 
12,eb,23 {Fk} | 22598 DATA Sa,hbb,c9,f8,80,c2,00, +1 2458 m u —— u 
2108 DATA 52,25,56,21,4€,69, 06, a9,20,96 {J8} | m tDD> 
19,782,12 <BN} | 2260 DATA bb,c9,f8,02,02,00,a5, . 2448 SAVE"sb.bin",b,&ABON,&52D 189) 
2118 DATA 23,13,10,#n,09,21,4c, dd,66,03 iKB} . 
bB,0&,10' <a) | 2270 DATA dd,60,02,73,23,72,69, ENDE DES LISTINAB 
2129 DATA 7e,00,50,bb,23,10,#9, te,Bl,c2 {EP} 
e9,f2,05 {BB} 2280 DATA 29,45,765,87,937,21,90, 
2138 DATA c2,00,25,05,08,7b,dd, fe,2b,7€ ur} 
Se,D2,dd <prc> | 2270 DATA 65,28, Fb,10,16,09,f8, 
8,220,2728,240,229,228,228,240,2 8,48,48,112,176,48,40,48, 49,48, 
SCHNEIDER LISTING MIT CHECKBUNMEN | 28,228,228 iKH>| 176,49,98,112,240,48 tına 
v2 ö 25 DATA 249,249, 240,240,248,248 36 DATA 49,76,240,249,4B,48,208 
,240,240,240, 240, 240,242,249,24 ‚248,45,48,96,249,249,48,48,240 
9,248,2208, 220, 248,240,7203,290,2 ur oh: Ei u Fan Pan 2a: 2@ ch 
. 2 49,228, 294 ,24B,249,204,20643,24B ‚3,44, ’ 9,4, ’ 
A 
25 DATA 248, 240,248, 2930,24D0,248 ’ „49, ’ ‚9,40, . ’ 
Mi a BE DEIN as ur) | „164,89,249,240,12,08,204,140,1 2,60,240,R8,52,204,240,98,52,608 
13 POKE &9B00+1 „arNERT <up> | 2:248,204,12,88,249,140,12.248, „240,148 ,48,48,260,224 ,48,48 toL3 
14 "as® Hinter "sb.bin” soyen % 249,12,75,240,249,12,264,298,24 SE DATA 248,240,240,240,99,48,2 
= wc | 27 para zu0,204.204 “wa N 2in,ob,112,40,210,56,112,08,28 
} 5 a f ,204,12,249,249 Ei ‚os ‚ty r ‚Hd, 
“ SAVE" sprites.bin",b,89800,7& FE 240,12,240,240,240,204,240,248, le Beat “u de 0 {na} 
DR Y 240 ,204,248,240, 2409, 2944,248,248 $ ® ‚8, Y ” 
Bau FrronEkennnnensenne nn 1333 | »?9@,2@4, 240,248, 248,216,240,24 49,20,240,144,49,48,248,49,48,2 
17 DATA 240,248,51,51,240,51,58 era Kahn a) 
‚57,177,51, 54,57,177,182, 81 ‚=, 25 DATA 75,204,248,249,204,2B8, ne a een Raaaaa.a {6403 
249,102. 204.204 „Dan,51 200,204. 290,299,284 ,216,240, 244,294 ,248 A 49,112,48,48,49,48,40, 
240, ‚177, 1, 5, S5 177, ge san ” ‚248,248,216,2498,2490,240,249,24 8,48,48,48,112,248,48,49,112,17 
’ ’ tIE} | 4,240,242,249, 240, 240,240,240,2 6,49,99,240,48,48,48,112,49,48, 
18 DATA 51,240, 240.54,57,51 WEN EIEEENO 
1,51 249, 249,54,57,514 40,240,248 {PP} 176,48,48,112,249,48 <0F} 
240,54,57,51,114,51,51,15%,114, 29 DATA 240,240 ,230,2 
204,204 ,153,240,284 ‚204 „51,248, 240,240,164, 12 Ban Sa,2ae 12,7 
51,51 
ala sin sie rin tia den" ar animierten | DAS WAR @S AGMM..» 
114,249,177,68,57,242,177,1886,5 el VERS EAU L2 ZA EN ZU: XND> 
7,240, 177,108,57,248,177,60,57 f R: 
au al nk zo ale sera) 30 DATA 240, 240,240,240,240,24B o..Iust: 
200 (ie 
20 DATA 298,249,114,240,240,177 EIN IEE N AR EEE EHRE 
‚si ‚249,248,59,68,114,240,54,18 16,240,240, 204,204 ,242,240,76,2 
6,114,240,54,156,114,248,54,6B, 04,216,248 tan 
114 ,240,177,51,240, 244,240, 240, 31 DATA 240,240,204,198,290,248 
249 Far | »294,204 ‚240,240, 228,284,248,24 
21 DATA 248,249, 208, 240,240,224 0,249,204,240,249,248,228,240,2 
»192,248,240,192,1904,224,224,19 98,249 ,230,2710,240,210,290,290, _ 
2,1904,224,240,192,184,192,249,2 248,230 ,240 {NB} SCHNEIDER LISTINB MIT CHECKSUMHEN 
24,104 ,192,240.224,192,172,249, 52 DATA 12,204,204,238,12,248,2 y2.8 
2a0, 240, 192 269, ! 49,740, 204, 240, 240,240 ,204 ‚240, 
22 DATA 240,224 ,240, 240,240, 192 249,240 ,204 ,240,2939,249,204,248 10 'waena4 TOP TEN een {16} 
ı208,240,208,148,192,240,208,14 ‚240,240,229,240,249,240,248,24 14 °* Erstellungspragramm # {cm} 
8,192,208,192,148,192,248, 192,1 0,240,248 tcH}| 12 DIM n#t10) „n(1@) „d$11@) {48} 
48,208,242,192,192, 208,248,192, 33 DATA 249.,249,240,248,240,240 13 FOR 1-1 10 18 181} 
249,240,240 ımcy | »48»48,249,175,48,4B ‚248,176, 11 14 n$(1)e"SUPRA-EOFT"opi1t=B {EE} 
23 DATA 204,204 284 ,192,216,248 2,52,240,48,176,52,248, 48,176,5 15 d$(1}e"B1.01.1987"uNEXT £BEH 
+240,192,21&,204,204,128,216,28 2,174,112,48,48,176,112,49,48 tN)| 15 "Hinter "sprites.bin" saven {6%} 
6,240,192,218,216,294,172,216,2 34 DATA 240,240,248,240,48,112, 17 OPENOUT"topteni1.til" {m} 
16,216,224 ,216,216,216,24D,21&, 240 ,240,49,48,240,280,60,56,112 18 FOR 1=1 TO 19 {63} 
216,216,248 any | 249,204 ,56,48,240,68,56,40,240 17 PRINT#F ,n3113 sPRINT#I,p{1> {FD} 
40,48, 96 ,2948,48,40 ,208, 240 {kK}| 20 PRINT#F,d$11):NEKTSCLOSEOQUT {BF} 


24 DATA 192,204 209 ,204,192,248 
‚240, 22B,64 ,204 204 ,228,192,240 
„228,228, 192,204 ,228, 228.288,22 


5/87 


35 DATA 48,49,176,40,48,48,48,4 
8,176,48,48,49,240,48,48,240,24 


Computbe mib 


ENDE DES LISTINGS 

















SCHNEIDER LISTING MIT CHECKSUMMEN 


v2.8 


BZ 5 2 Ze 2 2 5 2 2 2 7 2777,27 2027 7 27777 
‘# Bildschirminvertierer # 
EEE EAN 


iBRE DATA 21,.29,CQ,7E,EE 
I@2@1 DATA FF,77,23,7C,FE 
1282 DATA 88,C0,19,F5,00 
1993 ’ i 


1294 MEMORY BYFFFIFOR i=tAdmO T 


0 SANAF 


1205 READ ast FOKE i ,VAL("&"+a%) 


«NEXT i 
10B5 END 


ENDE DES LISTINGS 





{AL} 
{NG} 
{I} 
{DN} 
{NM} 
{ED} 
TEL} 
{AN} 





{NL} 


PEN ER EU 
5# BILDSCHIRMINVERTIERER # 


2 
;* 


‘Ccı 1986 2 
OTTFRIEDB SCHMIDT * 


PR d SS £ 0 2 2 2 5 2 Se 2 2 22 3 2 7 2 5077 


“Compute mit“ 3/87, Amiga 
interessiere mich für den 
AMIGA 2000. In allen bisher ver- 
öffentlichten Berichten fehlen 
Hinweise auf die Musikfähigkeit 
des Computers. Außerdern stellt 
sich für mich die Frage nach Pro- 
grammen und Listings. Wie sich 
aus den Inseraten in al len Compu- 
terzeitschriften ergibt, suchen vie- 
le AMIGA-Besitzer nach - Pro- 
grammen und Listings. Werden 
Sie solche zu einem späteren Zeit- 
punkt veröffentlichen? 
Oder gibt es Bücher, in denen 
Programme und Listings vorhani- 
den sind? . 
Wilhelm Henning, Essen 


Redaktion: 

Die Soundfähigkeiten des AMI- 
GA sind ausgesprochen gut, ob-. 
wohl .er nur einen Soundkanat, 
mehr besitzt als:der C 64. Der 
‚Grund liegt einmal in der Quali- 
tät des Soundchips, zum anderen 
in ‚fest eingebauten Betriebssy- 
stemroutinen, die die Program- 


SABDOB. 
HL_,&CBad 


A,iHL) 5 


sAB KANMG IM SPEICHER 
;STARTADRESSE BILDSCHIRMSPEICH 
ER 


BYTE HOLEN 


5 INVERTIEREN 
3UND ABSPEICHERN 
JADRESSE HÜCHZAEHLEN 


3HIGHBYTE DER ADRESSE IN AKKU 


;FERTIG? 


4 WENN JA, ZURUECK INS BASIC 
35SPRUNG ZUM SCHLEIFENANFANG 


Leser- & Meckerecke 





mierung zum Kinderspiel ma- 
chen müßten. Auch die Stereofä- 
higkeit verbessert die Klangfähig- 
keiten des AMIGA enorm. Man 
kann den Entwicklern wirklich 
dankbar sein, daß sie bei dem 
AMIGA mehr an die breite Masse 
der Benutzer gedacht haben und 
nicht wie ATARI nur an die Be- 
sitzer von MIDI-fähigen Synthe- 
syzern, MIDI ßt sich übrigens 
mit geringen Mitteln auch beim 
AMIGA realisieren. Der Hard- 
wareaufwand ist wirklich mini- 
mal. Aber bei allem hapert es letz- 
lich an der Software, was den 
zweiten Punkt Ihrer Anfrage be- 
trifft. Die Softwarehäuser hatten 
offensichtlich nicht mit einem so 
schnellen Anstieg von AMIGA- 
Verkäufen gerechnet, Sa kommt 


es, daß fast alle Softwareprodukte. 


mit mehr oder weniger gravieren- 
den Mängeln behafter sind. Dies 
liegt daran, daß in der Kürze der 
Zeit. die "Maschinensprachepro- 
Feng noch. nicht 


rrscht wurde und auf die Pro 


be-. 


grammiersprache C zurückgegrif- 
fen wurde, die vielen Program- 
mierern vom Macintosh her be- 
kannt sind. Auf dem MAC in C 
programmierte Software läßt sich 
übrigens ohne viel Mühe auf den 
AMIGA übertragen. Manches 
aber ist in C viel zu langsam, ich 
denke dabei an die FILL-Routi- 
nen mancher Malprogramme, die 
die Geschwindigkeit von Mandel- 
brotgrafiken kaum. unterbieten. 
Aber, so glaube ich, die Zeit steht 
nicht still, und hockwertige Soft- 
ware wird bald erhältich sein. Sol- 
che aber als Listing zu veröffent- 
lichen, halte ich jedoch für un- 
wahrscheinlich. Dagegen spricht 
die Länge solcher. Programme 
und besonders auch die Vielfalt 
der Programmiersprachen. 

Uwe Knierim 


Betr.: Deutschen Zeichensatz für 
Commodore Plus 4 


Sehr. geehrte Damen und Herren, 
ich besitze seit einiger Zeit einen 
Commodore ‚Plus 4 und bin mit 
diesem Computer auch sehr zu- 


Eine'Sache gibt es aber, die mich: 


Bildschirm- 
Invertierer 


Dieses kurze Programm invertiert nach dem Aufrak 
mit CALL & AdaD blitzschnell den Bildschirm. 
Dieser Effekt ist jederzeit umkehrbar. 


Für Kenner der 
Maschinensprache 
ist das Assembler- 
listing mit 
abgedruckt. 


— 


bei dem Betrieb meines Compu- 
ters sehr stört: Die Arbeit mit 
dem eingebauten Textverarbeit- 
sungssystem wird sehr erschwert 
durch die Tatsache, das man die 
Umiaure, wie in diesem Brief 
auch, sehr umständlich mittels 
der ASCI-Codes eingeben muß. 


Meine Frage nun zu diesem The- 
mengebiet: Ist Ihnen eine Firma 
bekannt, die ein ROM für den 
Commodore Plus 4 herstellt, wel- 
ches einen deutschen Zeichensatz 
erzeugt? 

Fails dies der Fall sein sollte, bitte 
teilen Sie mir die Adresse der Fır- 
ma mit. : 
Auch in Ihrer Zeitung konnte ich 
bisher keinen Krukal zu diesem 
Thema finden, aber ich hoffe 
doch sehr, daß Sie mir weiter hel- 


fen können. 


Timm, Pattensen 


Redaktion: Wenden Sie sich bitte 
an die Firma Kingsoft, die ein Be- 
triebssystem mit deutschem Zei-. 
chensatz vertreibt. 

Kingsoft, Schnackebusch 4 


"5106 Roetgen 


Tel. (02408) 5119 
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Bildschirmausdruck für Schneider CPC 
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1a RAR EN HE 
RER 

119 

128 "Screendump fuer den ECPE+DM 
P 2200 

158 'geeignet fuer MODE i+2, ka 
nn 

148 'aber auch im MODE 8 benutz 
€ 

158 "werden 

158 "Befehle: DUMP, INTON, INTO 
FF 

17m * 

IM, EEE UNHENE 
aun..r 

1928 MEMORY HIMEM-4A41& 

ze8' FOR i=HIMEM+1 TO HIMEM+41& 

210, READ w$: IF MIDS tw, 1,1) =" 4" 
THEN 270 

220 weVALl"&"+4n$)ı5=5+wıPOKE i, 


w 

2308 NEXT 

748 READ ws: IF HEX$1s,4)<>uFTHE 
N PRINT"DATA ERROR":END 

250 CALL HIMEM+1:PDKE HIMEM+1,2 
21 

268 PRINT"IINTON, IINTOFF, IDUM 
P sind initialisiert"sEND 

270 w=VAL("&"+MIDS In, 2) ) ıuns+l 
» AND 255) +1NT (w/256) 2 
ZBW w=w+HIMEM+1. 

298 POKE i ,UNT(WAND 255: 4=i+1: 
POKE 3 „INT (u/256) 

au GOTO 230 

z18 DATA 21,#0991 ‚91 ,#0009,C3,D 
1,BC,#90014,C03,#0924,C35,#003B 
328 DATA C3,#QU5F „49 ,4E,54,AF,C 
E,49 ,4E,54,4F ,46,06,44 

33@ DATA 55,4D,D9,00,21,#9047,1 


. 1, #ROB4E ,04,81,CD,EF,BC,21 


344 DATA #9041,11,01,00,01,01,8 
2,03,E9,BC,21,#2841,03,EC 
350 DATA: BC,29,00,00,20,22,00,0 


{AUF 
?DG} 


{HC} 
{EI} 


£1P} 
{DK} 


{40% 
{DA} 


{NG} 
{573 
{BK} 
{nB} 


tJF} 
t0L> 


{PJ} 
{BK} 
iPB} 


{01} 
iNAF 


{FA} 
{PC} 


{FL} 
{HL3 
HH} 


Gr} 


Programme 


Dieses Programm ist in Form ei- 
nes Basicladers geschrieben, der 
das Maschinenprogramm  auto- 
matisch unter HIMEM ver- 
schiebt. Das Maschinenpro- 


gramm belegt 416 Bytes Speicher- 


platz. Es stellt drei neue 


RSX-Befehle zur Verfügung, die. 


alle mit einem vorangestellten 
senkrechten Strich(SHIFT + 
Klammeraffe) eingegeben werden 


müssen.: 


INTON, INTOFF, DUMP 


Nachdem der Befehl INTON 
eingegeben wurde, kann man 


durch Drücken von CTRL und’ 


COPY einen Ausdruck des ak- 
tuellen Bildschirms erzeugen. IN 


TOFF macht dies wieder rück- 


gängig. 

DUMP erzeugt direkt einen Bild- 
schirmausdruck. Er kann sowohl 
in MODE 1, wie auch in MODE 
2 erfolgen, In Mode 2 werden die 
Farben als Grauschattierungen 
ausgegeben. Man kann auch in 
MODE 0 ausdrucken, allerdings 
werden dann nur 4 verschiedene 
Farben in Graustufen ausge- 
drückt. 

Die Taste, die den Bildschirmaus- 
druck aktiviert, kann geändert 
werden. Der letzte Wert in der 
Zeile 350 entpricht der Tasten- 
nummer. Der Bildschirmaus- 
druck kann übrigens mit SHIFT 
jederzeit abgebrochen werden. 


0,008,00,20,90,00,00,3E,07 
S6® DATA ED,1E,BB,CB,CB,79,C8,D 
D,ES,CD,#225F ,DD,E1,C9,ED 
370 DATA 73,40132,CD,11,BC,FE,8 
2,C0A,#90134,3E,06,32,90125 
388 DATA 11,08,09,21,8E,01,CD,C 
@,EB,21,#@122,CD,#0205,04 
39a DATA 43,05,06,82,05,21,4812 
6,20 ,#0BD5,06,AQ,C5,11,00 
400 DATA 08,21,FA,FF,CD,C3,RB,B 
6,03,C5,11,00,0@,21,02,20 
418 DATA CD,F3,BB,C1,CD,#818F,E 
5,10,EF,11,22,00,21,08,00 
420 DATA CD,C3,BB,D1,E1,DD,E1,C 
D,#B0FA,C1,1@,D9,C1,10,C4 
4290 DATA 21 ,#812C,CD,#0RD5,11,8 
B,FD,21,FA,FF,CD,C3,BB,Ci 
440 DATA 18,AF,21 ,#B12F ,46,23,7 
E,23,CD,#0@DF,18,F9,C9,E5 


. 450 DATA C5,47,3E,15,CD,1E,BB,2 


2,9C,CD,2E,BD,38,F4,78,CD 
460 DATA 31,BD,C1,E1,09,ED,7B,# 
0132,C09,96,02,1A,87,87,B6 

478 DATA 87,87,DD,B6,09,13,23,D 
D,23,CD,#@@DF ,18,EE,C09,E6 

480 DATA 83,87,5F,16,00,21,#011 
A,19,C09,08,00,03,03,02,81 

490 DATA 81,01,03,1B,41,04,05,1 
R,2A,04,40,01 ,902,80,0A,82 

S5B@ DATA 1B,49,09,00,3E,07,32,# 
0125,11 ,00,22,21,90,01,CD 

518 DATA C9,BR,21,80122,CD,#aab 
5,06,34,C5,06,02,05,21,#0126 
528 DATA CD,#0RD5,01,49,801,05,8 
6,07,05,11,00,0@,21,FF 

539 DATA FF,CD,FZ,BR,C1,F5,10,F 
2,11,01,22,21,07,28,C0,C3 

542 DATA BB,064,97,AF,E1,CR,1C,1 
F,18,FA,@aF,CD,#G00DF,Ci,0B 
554 DATA 78,B1,29,D3,01,10,06,2 
1,#012C,CD,#0RD5,11,B0,FD 

560 DATA 21,F9,FF,C0,63,BB,C1,1 
0,B1,21,#9812F ,03,#0205,08 

570 DATA 9%7A9 


ENDE DES LISTINGS 


Gompube miß 


{0B3 
{LE} 
{11} 
sr} 
{NT 
tem} 
IKC} 
{c43 
{NK} 
ik1} 
{IE} 
t0E} 
{Ic} 
{OF} 
{PE} 
«CM} 
{DM} 
{L0} 
{NH} 
{6A} 
{imB} 


MG} 
<EP} 














programme 


INSELN) 





Endlich! Nach fünf harten Jahren 
ist es soweit! Sie und ihr Freund, 


stehen vor der Abschlußprüfung 





der Weltraumakademie. Die Auf- 
gabe die Sie dabei bestehen müs- Die Steuerung erfolgt mit dem Jo- 
sen, besteht darin, ein von Aliens ystick. Drückt man diesen nach 


verseuchtes Terain zu durchflie- 
gen. Leider hat Ihr Kumpel in der 
vergangenen Nacht seine bestan- 
dene Prüfung im voraus gefeiert. 
Nun ist er nicht mehr in der Lage, 
aufrecht zu gehen, geschweige 
denn einen Raumgleiter zu flie- 
gen. Natürlich wollen sie ihrem 
Freund helfen, und so haben sie 
in der Nacht unbemerkt eine 
Fernsteuerung in dessen Gefährt 
eingebaut; sie können jetzt beide 
Raumschiffe mit einem Steuerk- 
nüppel fliegen! Dies ist in Kürze 
die Story zu diesem Action- 
Geschicklichkeitsspiel DOUBLE 
TROUBLE (zu Deutsch: doppel- 
ter Ärger). 

Steuern Sie nun die zwei Raum- 
schiffe total unabhängig vonein- 
ander durch zwei Spielflächen. 


links, so übernimmt man die 
Steuerung des unteren-, drückt 
man den Joystick nach rechts, die 
des oberen Raumschiffs, Es ste- 
hen zu Beginn des Spiels acht 
Schwierigkeitsstufen zur Aus-- 
wahl. Von “Halbtoter“ bis “Toral 
Verrückter“, Anfängern sei an 
dieser Stelle die Stufe “Halb To- 
ter“ empfohlen. Nach jeweils 20 ° 
abgeschossenen Feinden gelangen 
sie in den nächsten Level, wofür 
sie 100 Bonuspunkte erhalten. Al- 
lerdings wird das Spiel von Level 
zu Level immer schneller, was 
spätestens in Level 5 sehr gute Re- 
er erfordert, Zur Ein- 
gabe ist nicht viel zu sagen: Tip- 
pen Sie das Programm ein und 
vergessen nicht, es vor dem ersten 
Start abzuspeichern. Dann ein- 
fach laden, und mit RUN starten. 
Und schon geht die Post ab. 
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(2 


TREE 
"# DOUBLE TROUBLE = 
# 40} 1987 BY * 
"= OTTFRIED » 
’'- SCHMIDT # 
"EEE AREH 


1088 MODE ArPEN IeLOCATE 5,12ıP 
RINT"BITTE WARTEN" 

iQ1iB SYMBOL AFTER 256: MEMORY &7 
FFFISYMBOL AFTER 471 adr =K7FFF-1 
672 

18228 FOR adr=adr TO &7FFF STEP 
8 

1932 POKE adr ‚PEEKtadr) 7/ZıPOKE 
adr+1 ,PEEKtadr+1)/2 

iB40 POKE adr+2,PEEK tadr+2) 7/ZıP 
GKE adr+3,PEEK (adr+3)/2 

1058 NEXT adr 

1068 ENV 1,=11,45B0H ENT-1,5,1,8 
6,2,41,534,2 

1878 ENV 2,=11,500@ 

1258 DATA 1308,1,1,49,0,02,15,30, 


8 

1098 DATA 132,2,12,109,0,25,15,40 
L.) 

L} e 

11@2 FOR i=4B6408 TO «EA: READ 
aıPOKE 1,aıNekt i 

1118 FOR i=&17g0 TO &87084 READ 
arPOKE i,asNEXT i 

1128 MODE BrPEN Zr LOCATE 5,12ıP 

RINT"LESE DATA's"sG0OSUB 2709 
1138 GÜOSUB SIR: CAHLL 89223 

1148 GBSUB 5A58 

1152 FOR i=&A579 TOD LA7IB:POKE 

I,Qı NEXT i ‚ 

1160 DATA A3,93,A3,A4,A9,05,A5, 
A5,06,10,08,F0,68,00,40,B8,20,7 

0Q 


OSeUAAUN® 


1178 DATA AQ,AD,AL,Ai,N2,A2,78, 
E9,30,00,32,A8 

118m DIM s19) „t (9) ‚an (8) ‚anht& 
) ,Score(9) ‚aco$(9):RESTORE 116R 
1199 FOR i=1 TD FREAD atıs(i)= 
VAL("R"+a%) :NEXT i 

120@ FOR i=1 TO FsREAD asıt li)“ 
VALUKHARI NEXT i 

1212 FOR i=1 TO &: READ a$zanh (i 
I=VAL("R+aF) NEXT i 


{DD} 
FC} 
{PH} 
<cL} 
{HF} 
iPX} 
<m} 
{EB} 


<PJ} 


{ND} 
{31} 
{JE} 


tIH} 
{FH} 


(03 
iLF} 


{JP} 
<FM} 
{643 
{KK 
<EE} 
IKN} 
an} 


{PJ} 


irn 3 
(307 
£KA} 


1224 FOR i=1 TO 6rREAD assanl li 


311B,anhtlex) ıPOKE &F7113,anhite 


I=VALC"K" Has) ıNEXT i BL} | xIzFOKE 89123 ,0nhtiex) {PF} 
1238 s2=35@H FOR 1=1 TO Brscuret 1578 MOVE 1,379: DRM 1,384,5:M0 
I)=S2:BcC0aF ti I)="CPOTı0zesr-1DINE VE 637,399ı DRAW 639,384 ,4 {ec} 
xT i {LE} | 1588 MOVE 1,15: DRAW 1,0,6: MOVE 
1240 GOSUB 5149 PF} | 639,153 DRAM 639,0,4 ch} 
31250 MODE BsINK D,L3:INK 1,5: IN 1598 MOVE 1,235:DRAW 1,144,5:M0 
K 2,15: INK 3,25 {EN} | VE 637,254: DRAN 639,144,4 {NAr 
1250 INK 4,01 INK 5,13:INK 6,261 1698 MOVE 31,248:DRAW 31,158,4r 
INK 7,14: INK 8,28 INK 9,6: INK 18 MOVE 608,240:1DRAH 609,158,6 {NB} 
‚24 <B33 | 1418 MOVE 1,3995 DRAW 449,399, IA} 
127® INK 11,15 INK 12,13: INK 13 1628 MOVE 31,159:0RAN 408,159,68 CK} 
a7r INK 14,41 INK 15,3 PC} | 1438 MOVE 1,1S51DRAW 640,15,&4 PN? 
En, re 
. ® = F . 
ne Metz, IMETERLAESIEREN et 1&5D MOVE 1,134:DRAW #49,144,4 {CP} 
1328 sc=Dtlives-ä t3c; | 1670 MOVE 1,0: DRAW 649,0,4 sale 
1330 level=sirlex=1ılaxi=? can; | 1680 MOVE 31 ,ZAR-DRAW 6u9,200,4 (PDF 
Fi E17 
134@ POKE &9142,0:POKE &9143,8 ıpp>| 167@ PEN 1:LOCATE 3,12:PRENT"SC 
1358 CLS:PEN SsLOCATE 4,23 PRINT ERESSUIEFARSSELS 
2 
A ö 1708 PEN ZeLOCATE 3,1S:PRINT"OB 
1368 LOCATE LZASPRINT"B Halb To | BOB "sıkvans” : =jluvel RuE% 
er, ide TO np; | 1710 CALL 89930 {AH} 
137@ LOCATE 1,6 PRINT"1 Blutige 3720 PEN ZULDCHTE TTISRERINIEEN 
5 . OUBLE TROUBLE ® XGF} 
me gsrmenniz aneaene ' |13730 LOCATE ISA7EFENRE {FC} 
= ” 9 KL} | 1748 POKE %9184,A:POKE &9105,20 
2 :POKE 89106,70 [919) 
a TE AOPRINT"S Fortge | 1750 FOKE BIIBZ,A:POKE UIIGS;CA 
1400 LOCATE 1,124PRINT"4 Profi" 1pE}| ® 1483 
1418 LOCATE 1,14: PRINT"S Expert 1750 FOKE %9100,2R:POKE Krı1dl,D {LI} 
e" {JK+| 1770 CALL &92BE:POKE %9108,70:6 
1420 LOCATE 1,164PRINT"& Wahnsi ALL &I2BE {NN} 
nniger* <1D} | 1788 POKE &9107,4sPOKE LI1BF,3ı 
1439 LUOCATE 1,184 PRINT"7 Total POKE &?117,6:POKE EIA1F,7 .  tABr 
Verrueckter" {J1}| 1798 POKE 47198,72:1 FOKE &9118,7 
1449 LOCATE 2,2Qr INPUT'NUN“ 43 {19} | 2:POKE &7118,72:POKE %9128,72 1C53 
145® IF 1>7 OR 1<B THEN GDTO 13 1208 POKE &9187,B:POKE &9111,16 
sa {GH} | 3POKE &9119,70:POKE &9121,00 IK} 
1818 POKE &IlAC,12POKE KF114,1e 
1442 IF 1=9 THEN Iei=9ılez=258 trpy | POKE 8711C,2ıPOKE 89124,1 1027 
1470 IF 1>1 THEN lei=71le2=25g cı.py | 1920 POKE &910D,SIıPOKE &9115,20 
1459 IF 1=2 THEN lel=6:le2=258 IKC) | POKE 8S11D,A:POKE 87125,2 {EB} 
1494 IF 1=3 THEN lei=5ıle2=250 . {AI} | 1832 POKE R91BE,S:POKE KrllonZe_ 
1599 IF 1=4 THEN lei=4:1e2=258 OB}! POkE BILIE,ATPOKE R9126,2 {PG} 
1510 IF 1=3 THEN-1e1=3:1e2=25®8 {HI#| 1940 POKE 3912E,76:P0KE &F131,7 
1529 IF 1=& THEN lei=2:le2-258 {FP}| &:PÜKE W9134,761P0KE &9137,76 ME} 
1528 IE 1=7 THEN lele1:le2=259 AM} | 1850 POKE &712F,14:POKE &9132,2 
1548 CLS _ {BD} | BsPÜKE %9135, 70: PÜKE &9130,7& iKE} 
1558 POKE &91BA,anl (lex) rPükE' % 1360 POKE 89139,lexi:POKE &I13A 
911A,anl (ler)sPOKE &9112,anl (le „&BA:FOKE &F1SB,1:POKE &9127,0: 
x)2POKE &9122,anl (lex) {NE} | FOKE %712A,9 {bu} 
1560 POKE &710B,anh lex} POKE & 1870 POKE %7140,anl (lex) sPOKE & 
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7141 ,anhtlex} 

1B8AQ POKE &IAFD,A 

1898 POKE 43144 ,1eilsPOKE &9145, 
le2 

19729 CALL %FI2E7 

19190 ” 

1928 IF PEEKIEFBFDI=1 THEN POKE 
EIRFD,8:G0OTO 19748 ELSE GOTO 28 

62 

19398 "EXPLOSION DER RAUMSCHIFFE 
1949 a=PEEK (KI1B5)  b=PEEK (&I10& 
) 

1958 ENVY 3,=11,55809:50UND 129,5 
‚g9,15,3,8,25 

19680 POKE &I1D1,0:FOKE &I146,8 
1978 FOR 1=1 TO 2:FÜR i4=1 TO 9 
1988 POKE F1R2,tt1)ıPOKE KY1BS 
‚s(i) 

1992 POKE &I10M,a:CALL &I2BE 

2000 POKE &97100,bıCALL &928BE 

2818 CALL E£BDIF:CALL &BD17 

2929 NEXT 4,l11CALL &920& 

2838 lives=-lives-Is IF livesc=-t 
THEN GOTO 2500 

2849 010 1559 

2058 ’LAECHSTER LEVEL 

204,9 POKE' &9194,8 

2970 lex=iex+l:IF len>=7 THEN I 

ex=1 

2000 lexi=elexi+71IF lexi>e4ß TH 

EN lexi=? 

2098 level=ievel+ti 

2189 le2=1e2-50: IF 1e2<-B THEN 
1e2=24Q: lei=lei-isIF lei<=t THE 
N lei=1 

2118 SOUND 129,12,58,15,1,1,38 
2128 FOR 1=3 TO 2:FOR i=1 70 9 
2138 FOKE KF1R2,t ti) POKE 89195 
‚5(1) 

2140 POKE &9100 ,PEEK (89189) 1 POK 
E %971B1 ,PEEK (&F1QB) ı CALL &92BE 
2150 POKE &F199,PEEK(&P111):POK 

E 89191 ,PEEK(&F11@) :CALL &9728E 
21&0 POKE &7198 ,PEEK (&9119) :POK 
E &91081 ,PEEKI&FI11B) ı CALL &928E 
2170 POKE &9199,PEEK(&7121)ıPOK 
E 29181 ,PEEK(&7128) :CALL &928E 
2180 POKE &F10R ,PEEKIUF12F)RPOK 
E 89191 „PEEK(EIIZE)TCALL &928E 
2190 POKE &I1BD,PEEK (&9132) :POK 
E AF1D1 „PEEK(&I1S1I SCALL &92BE 
2209 PÜKE &9100,PEEK (&9135) :POK 
E BRI1D1 ,PEEK(KIISA)SCALL &92BE 

2218 POKE'&I1ND ,PEEK (&7138) ı POK 
E %91Q1 ,PEEK(&FI137) :CALL &92BE 
2228 CALL &BD19:CALL &BD19 

2230 NEXT i,1:CALL 39206 

2249 CLS:LOCATE 3,12:PEN Z2ıPRIN 
T"NAECHSTER LEVEL” 

225@ SOUND 129,59,68,15,1:50UND 
1,69,49,15,1 

2258 SOUND 1,498,08,15,1 

2278 FOR 1=1 TO 2598: NEXT i 
2298 POKE &9143,PEEK1&F143) +1 

2298 GOTO 1558 

2300 ” 

2318 

2322 
2338 CAlL 89226: INK 14,64 

2340 FOR i=1 TOD 2:LGCATE &,12ıP 

EN 14:PRINT’"GAME üVER"zPEN 2 

2350 FOR l1=1 T9 IBM:NEXTD I:CALL 
&9I2B6:NEXT i 

23560 LOCATE &,12:PEN 141PRINT"S 

AME BDVER":PEN 2 

2378 FOR i=1 TO iM:For i=7?7 TO 

8 STEP-1 

2388 INK 14,1:50UND 129,2088-(1 

*1),4,6 

2390 NEXT 1L,31:CL$S 

24838 LOCATE 6,12:PRINT"LAST SCO 

RE" 

2418 sc=VAL. CHEXFKPEEK(EILIFY IH 

EX$ (PEEK {%&7142))) 

2429 IF PEEK{%9142)=B THEN sc#s 

criB 


"BAME DOVER 


{1A} 
AG} 


{31} 


{AB} 
KAgr 


{LL} 
zul} 
IN} 
{00} 
{BJ33 
<BF} 
(DB} 
aM} 
{NA} 
{HL} 
{MI} 
AHA 
{PA} 


tik} 
{BG} 


«LP} 
im} 


{BG} 
CK} 
{API 
{PH} 
{H0} 
{FF} 
{D6} 
{HN} 
iKC} 
tEJ) 
{IN} 
{EK} 
{DA} 
{10} 
KL) 
<AN} 
{EF} 
177 
NM 
t0N}> 
{AT} 
cp} 
tAC) 
£BL} 
{603 
{ME} 
{LK} 
{CI} 


<NI+F 
{IP 


{E0} 
{HF} 
HP} 


2438 LOLCATE 9,13: PRINT sc 

2448 CALL %&BRBS ; 

2458 x=B: FOR i=1 TO B:IF sc’sco 
reli)THEN x=1 

Z460 NEXT i:IF x=B THEN FOR iwl 
TO ARBGOSNEXT irGOTO 1250 

2478 FOR i=1 TO ZRAR:NEXT 4 
ZA0R CALL &BRDS 

2498 CLBILOCATE 3,12:PRINT"Dein 
Name bitte": INPUT sco$(P)ıscor 
e(?)=sc 

2508 FOR i=1 TO 9%FOR 1-1 TO 8 
2518 IF scoret(l)<scoret(i)THEN h 
s=score(i)shs$=sco$(i):scoreli) 
=score(l)ısco$®l(i)=sco$tl)ıscost 
l)=ehs$ıscore(l)=hs 

252@ NEXT 1,i 

2530 CLS:PEN “FOR i=1 TO B:LOC 
ATE 1,5+11PRINT is," "ıIscoreti)ı 
LOCATE 11,5+i:PRINT sco#(i) 
2548 NEXT i:PEN 2 

2559 G0SUB 2549: 60T0 1252 

256B ENT-4,4,9,1,43,-5,1 

2570 ENV 4,=11,3000 

2588 RESTORE 2598 

2598 DATA 60,60,30,68,30,62,60, 

30,58,50,70,60,30,48,48,32.71,7 
1,364 71,36,71,71,36 

2280 DATA 71,71,364,71,36, 71,71, 
35,09,80,40,89,430,00,20,409,00,8 
0,40,88,49,09,68,40 

2619 DATA 09,89,45,99,453,87,89, 
45,89,689,45,89,45,89,87,45,1 
2620 READ azIF a=i THEN RESTORE 
2598:60T0 2628 

2538 EQDUND 127,a%12,195,15,4,4 
Z&A8 SOUND 132,8#12+1,14,15,4,4 
245B SUUND 1390,a#65,12,15,4 
2658 IF JOYIBIAND 1& THEN BALL 
&BBBF: RETURN 

26720 WHILE 501) >127ıWEND 

2588 GOTO 2428 

2u70 ° 

2708 DATA SE,0A,3D,28,F0,09,21, 
82,0.9,05,03,11,83,06,ES,ED 

2718 DATA 19,BD,C0D,1A,92,E1,23, 
18,F5,69,AF,77,00,290,92,17 

2728 DATA D8,18,F7,21,92,C9,DD, 

21 ,20,824,FD,21,00,81,96,.64 

2738 DATA 7C0,00,77,898,70,FD,77, 

@9,0D0,23,FD,23,C0,25,BC,CD 

2748 DATA 26,BC,19,EC,C9,DR,21, 
29,99,FD,23 ,00,091,74,32,56 

2759 Data 92,32,5%,92,DD,7E,20, 
67,FD,7E,28,4F,15,00,19,E5 

2760 DATA 1&,18,1E,07,09,77,803, 
23,1D,20,F9,E1,70,06,28,67 

2778 DATA E&,38,20,14,7C,D4,40, 
67,7D,C6,58,6F ,30,0A,24,7C 

2780 DATA E6,97,20,24,7C,D6,08, 
67,E5,15,28,D6,E1,09,39,00 

279@ DATA 91,57,3A,81,91,5F,ED, 
48,282,71,C0D,45,72,C07,DD,21 

2808 DATA 89,88,FD,21,00,81,7#A, 
32,AF,72,32,B3,92,DD,7E,B88 
2818 DATA 57,FD,7E,00,64F,16,08, 
197,E5, 14,03, 1E,03,20,77,83 

242@ DATA 23,10,20,F9,E1,7C,C6, 

%B,67,66,39,28,14,70,06,40 

2839 DATA 47,7D0,C06,58,6F,30,@A, 

24,7C,E8,807,28,04,7C,06,88 

2848 DATA 67,E5,15,290,D&A,E1,C9, 

34,94,91,5D,28,05,32,04,91 

Z35E DATA 18,08,35€,02,32,04,91, 

ED,DB,73,34,27,791,30,28,85 

2868 DATA 32,97,971,18,0C,3E,B&, 

32,87,91 ,DD,21,27,91,0D,55 

2970 DATA 94,3A,8F,91,3D,28,05, 

32,087 ,91,18,00,3E,865,32,0F 

2880 DATA 91,DD,21,8F,91,C00,55,- 

74,34,17,91,50,28,85,32,17 

2890 DATA 91,18,0C,3E,06,52,17, 

71,0D,21,17,71,CD0D,09,94,3A 

2989 DATA 1F,91,30,28,085,52,1F, 

91,19,00,38E,058,32,1F,71,DD 


-2F10 Data 21,4F,91,00,D9,94,3A, 


Gompute mi 


tBK} 
{CN} 


{EA} 


{C0} 
40E} 


{DB} 


{NK} 
{Ar} 


{EP} 
kA} 


{ar 
IL} 
PB} 
{PD} 
{ir} 
{MG} 


<A0} 


PA} 
983 
{DNI 
{CD} 
£DI} 
{CE} 
{FE} 
{DF} 
Tan} 
{aa} 
£MF}$ 
{CD} 
{OH} 
IK} 
{KL} 
{ME 
{pm} 
{NA} 
tAH} 
{mM} 
{PB} 
m} 
TH} 


{01} 


<EE} 
{ME} 
1033 
44} 
{133 


{EP} 


Programme 


20,91,30,28,85,32,2D,91,18 
2728 DATA 2E,3E,04,32,2D0,91,DD, 
21,2D,91,CD,50,93,34,38,91 
2938 DATA 3D,24,85,32,38,91,18, 
©C,3E,@5,32,30,71,DD,21,30 
2944 DATA 91,CD,50,95,36,35,91, 
30 ,28,09,32,33,91,19, 8%, 3E 
2350 DATA 09,32,33,91,D0,21,33, 
91,6D,7C,95,3R%,36,91,3D,28 
2958 DATA 05,32,34,91,18,00,3E, 
84 ,32,36,91,DD,21,36,91,CD 
2978 DATA 7C,95,3A,27,91,FE,G, 
C4,40,96,30,FF,98,FE,B0,C# 
2729 DATA 69,97,34,24,91,FE,08, 
64, 77,96, 3A, FE,92,FE,89,04 
2770 DATA 90,97,3A,FD,92,FE,00, 
C9,C3,890,997,C0D,24,BB,FE,00 
3000 DATA CA,E9,9S,EE,FF,67,CB, 
5C,28,87,CB,54,28,1F,C3,E9 


'z@10 DATA 95,CB,40,C0,27,94,CB, 


44 ,CC,3F ,94,CB,64,C0,14,9& 
3020 DATA 01,08,A0,34,95,71,57, 
1E,00,CD,45,92,09,CB,4C,CE 

3939 DATA 34,94,CB,44,CC,AA,9A, 
CB,64,2C,39,96,81,00,AB,3A 

3048 DATA 96,91,57,1E,00,0D,35, 
92,09,3A,05,71,FE,1C,C8,3C 
3058 DATA 32,85,91,09,34,06, 91, 
FE,38,08,30,32,86,91,07,34 
39062 DATA 85,91,FE,84,08,3D,32, 
05,91,09,39,06,91 ,FE,A8,CB 
3978 DATA 30,32,06,91,C9,DD,7E, 
2@5,FE,23,CA,C8,77,DD,7E,Ot 
ZuB2 DATA FE,B9,28,86,3D,DD,77, 
21,18,13,81,98,A6,5F ,DD,5& 

3270 DATA 02,0D,E3,C00,45,92,D0D, 
£1,3E,48,DD,77,21 ‚DD, 7E,06 

3120 DATA 3D,28,05,00,77,86,18, 
14,DD,7E,07,DD,77 ,86,DD,7E 
Z11a DATA 95,67,CB,44,00,D5,98, 
CR,40,EC,C7,94,DD,7E,@1,5F 
3128 DATA DP,7E,82,57,DD,4E,83, 
DR,46,94,DD,ES,CD,45,92,DD 

3130 DAFA E1,CD,7D,38,C09,DD,7E, 
AZ,FE,04,28,05,.3D,DD,77,82 

3148 BATA C9,3E,@1,DD,77,25,C09, 
DB,7E,82,FE,16,28,25,3C,DD 
3158 DATA 77,02,09,38,82,0D,77, 
85,09,0D,7E,25,FE,23,Ch,ED 
3149 DATA 97,DD,7E,81,FE,04,28, 
26,30,DD,77,01,18,13,81,90 
3178 DATA A&,5F,DD,56,82,DD,ES, 
C0,45,92,DD,E1,3E,48,DD,77 

Z1AB DATA @1,0D,7E,86,30,29,05, 
DD,77,25,18,14,DD,7E,87,DD 

3170 DATA 77,96,D0,78,95,67,CB, 
44,C0,37,95,CB,4C,CC,4B,95 
3288 DATA DD,7E,91,5F,DD,7E,82, 
57,DD,4E,93,DD,46,84,DD,ES 

3210 DATA CD,45,92,DD,E1,CD,A?, 
59,C7,DD,7E,82,FE,49,28,85 

3220 DATA 3D,DD,77,82,C9,3E,81, 
DD,77,45,69,DD,7E,82,FE,58 
3238 DATA 28,05,30,DD,77,92,09, 
3E,82,DD,77,05,09,00,7E,A1 

3240 DATA FE,MD,CA,9B,95,30,DD, 
77,81 ,5F,00,55,22,2D,4B,39 
3258 DATA 91,0D,ES,CD,9E,92,DD, 
E1,CD,D3,78,C9,DD,7E,@1,FE 
3248 DATA 98,CA,C2,95,30,DD,77, 
91 ‚SF „DD,56,82,ED,4B,39,91 

3270 DATA DD,ES,CD,E,72,DD,Ei, 
CD,FB,98,69,5F ‚DD,56,02,01 
3200 DATA 90,46,DD,ES,CD,PE,92, 
DD,E1,SE,4C,DD,77,81,ED,5F 
3278 DATA DD,77,00,47,34,05,91, 
e0 ,EE,FF ‚E6,17,06,86,DD,77 
3388 DATA 02,C9,5F,DD,55,82,Rl, 
79,46, DD,E5,CD,9E,92,D0D,E1 

331@ DATA 3E,4C,DD,77,81,ED,SF, 
DD,77,89,47,3N,96,91,80,EE 
332@ DATA FF,E6,17,06,42,D0,77, 
02,C9,3A,3B,91,FE,01,2B,12 
333@ DATA 91,02,N9,34,05,91,57, 
1E,908,CD,45,72,3E,81,32,3B 
3548 DATA 91,09,901,08,N0,39,06, 
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91,57,1E,09,CD,45,92,3E,82 

3359 DATA 32,38,91,09,38,27, 91% 
FE,88,08,3A4,85,91,06,83,32 
3360 DATA 29,91 ,3E,08,32,28,9t, 
SE 21 ,32,27,91,00,72,99,09 

3370 DATA 3A,2A,91,FE,B9,C9,JA, 
265,91,05,03,32,20,91,3E,RB 
3384 DATA 32,2B,971,36,01,32,20, 
91 ,6D,72,99,09,34,28,91,FE 
3390 DATA A40,28,16,30,32,29,91, 
21,00,84,34,28,91,5F,309,27 
za2a0 DATA 91,57,C0,9E,72,00,AG, 
95,09, ,AF ,32,27,91,91,90,06 
S410 DATA IA,28,91,57,34,29, 91, 
57,CD,9E,92,693,38,2B,91, FE 
3420 DATA 40,29,16, 30,32, 2B, 91, 
@1,20,84,34,28,91,5F,3Ay420 

3430 DATA 91,57,2D,9E,92,CD,D9, 
98,07,AF „32,20,91,01,98,A& 
3448 DATA 34,2B,91,5F,5A,20, 91, 
57,CD,9E,72,09,DD,21,87,#1 

3450 DATA CD,A4,97,FE,08,2B,00, 
DD,7E,B5,FE ,03,CRA,IE,81 ,32 
3458 DATA FF,72,09,0D,21,0F,91, 
CD,98 ,77 ,FE,88,C9,0D,7E,85 
3478 DATA FE,03,C8,3E,82,32,FF, 
22@,C9,DD,21,17,971,00,33,97 
3408 DATA FE,00,29,0C,DD,7E,@S, 
FE,AS,CR,3E,@1 ,32,FE,978,69 
34994 DATA DD,21,1F,91,CD,33,97, 
FE,898,080,DD,7E,@5,FE,23,C0 
3528 DATA SE,82,32,FE,979,C9,DD, 
7E,81,30,06,07,998,47,3A,28 
3510 DATA 91,B8,D8,4F,78,86,87, 
98,47 ,77,B6,DB,DD,7E,82,06 
3528 DATA 09,88,47,3A,27,71, Bd, 
DO,AF,78,86,08,79,47,77,BB 
3538 DATA DB,AF,C9,DD,7E,@1,IC, 
86 ‚87 ‚09,47 ,54,2B,91,08,08 
3548 DATA AF,79,86,07,90,47,79, 
89,D9,DD,7E,922,95:09,80,47 _ 
3550 DATA SA,2C,71,B8,D@,4F,78, 
06,09,72,437,77,B8,0D8,AF „29 
3548 DATA CD,69,96,60,21,97,CD, 
797,99 ,3A,FF,90,FE,01,28,198 
3578 DATA ZE,03,32,00,91,AF,32, 
FF,9@,21,A9,A2,22,AA,71,C3 
3580 DATA SE,03,32,14,91,AF,32, 
FF, 72,21 ,R9,A2,22,12,91,09 
3570 DATA CD,99,94,CD,21,79,CD, 
79,99 ,3A,FE,98 ,FE,81,28,18 
3609 DATA 3E,903,32,10, Pi, AF,32% 
FE,9D,21 ,AB,A2,22,18,91,07 
3618 DATA SE,03,32,24,91,AF,32, 
FE,99,21,AQD,A2,22,72,91,07 
3428 DATA DD,64,84,DD,4F,05,01, 
78,08,97,E5,C01,DD,74,24,D9 
3530 DATA 75,03,DD,56,22,DD,5E; 
01,C5,DD,E5,CD,45,92,DD,E1 

3648 DATA C1,3E,A6,BB,C8,3E,90, 
B9,68,CD,1A,98,69,DD,46,04 
3650 DATA DD,6E,03,91,78,00,07, 
E5,C1,00,74,904,D9,75,835,DD 
3560 DATA 55,92,D9,56,01,05,DD, 
E5,C0,45,92,DD,E1,C1,3E,A6 
3670 DATA BB,0R,SE,98,B9,C0,CH, 
59,78,09,ED,5F5E6,87,3C0,D 

Z60@ DATA 77,05,0D,77,87,ED,SF, 
47 ,3A,85,91,80,47,E6,0F ,C& 
36470 DATA 98,DD,77,02,5E,48,DD, 
77,01,78,24,40,71,00,75,03 
3708 DATA DD,74,84,CB,47,28,68, 
CB,4F „ZB, BA,ED,SF,1B,F4,3E 
3718 DATA 81,DD,77,05,C09,3E,92, 
DD,77 ,05,C9 ,ED4SF ,E4,97,3C 
372@ DATA 0D,77,06,DD,77,97,ED, 
SF ,47,30,06,91,89,47,E6,0F ; 
3739 DATA C#,44,DD,77,02,35E,48, 
DD,77,81,78,18,BPD,3E,08,47 ' 
3749 DATA DD,7E,21,BB,DR,4F,76, 
A&,07,98,47,77,B9,D8,5%,85 
3758 DATA 91,06,08,88,47,0D,7E, 
02,88,DD,4F,78,05,028,90,47 . 


3748 DATA 79,B8,D8,3E,01,37, FD; 


90,69, 3E,08,47,DD,7E,01;,88 


3770 DATa Da, ar, 78,06,07,970 „a7, h 
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79,B8,08,34,05,91 ,96,20,8® 
3789 DATA 47,0D,7E,02,B8,D@,AF, 
7B,06,28,90,47,77,BB,DA,SE 
3790 DATA 81,32,FD,30,09,86,98, 
DD, 7E,01 ,88,00,06,81,B3,D8 
3888 DATA 3R,05,91,04,08,88,37, 
0D,7E,02,BB,DB,AF ‚78,04, 08 
3B1@ DATA 90,47,79,50,DB,3E,Mly 
32,FD,990,09,24,28,DD,7E,01 
S8ZB DATA BB,D0,06,41,8B8,D8,3A, 
06,71 ,04,28,80,47,DD,7E,02 
3838 DATA BB,D09,4F,79,04,040,78, 
47 ,79,B8,08,3&,01,32,FD,99 
3848 DATA C9,3R,46,91,30,32,46, 
91,3R,42,91 ,06,00,27,32,42 
3358 DATA 91,30,09,34,43,71,C6, 
21 ,27,32,4%,71,26,04,2E,BD 
306@ DATA CD,75,BB,30,43,91447, 
iF,iF,1F,1F,E6,0F ‚C6,30,0D 
387@ DATA 5A,BB,78,Eh,BF ‚06,38, 
CP ,5A,BB,3n,42, 91,47 ,1F ,iF 
308 DATA IF,1IF,E6,BF,C6,32,CD, 
SA,bB,78,E&,BF,C6,3B,0D,5A 
3878 DATA BB,E9,21,020,84,CD,Ah, 
BC,C9,21,00,87,CD,AA,BC,C9 
3IOM DATA 34,44,91,47,49,34,45, 
91,47 ,10,FE,41,10,F4,3A,46 
3910 DATA 91,FE,14,08,63,E7,92, 
29,00,28,00,22,20,20,00, 0 
3920 " 

3930 RESTORE 27MG: FOR i=%97200 T 
0 &999F:READ asıPüKE i „VAL("&"+ 
as) ıNEXT i 

3940 RETURN 

3950 ° 

3950 DATA 20,00,00,08,00,00,02, 
28 ,08,00,00,00,00,20,22,CC 
3970 DATA CC,90,29,00,20,44,FC, 
FC,CC,CC,88,88,44,CC,DE,EC 
372m DATA B8,20,08,CC,0C,4C,FC, 
EC,RB,08,08,20,48,C0,FC,EC 
3998 DATA 998,44,00,04,06,C0,DC, 
C6,48,CC,C8,2C,C8,81,C00,04 
4008 DATA 20,40,00,05,42,00,C8, 
@C,48,03,42,90,09,49,C8,81 
AD1B DATA 47,52,29,00,49,03,03, 
CO,C8,88,08,29,09,00,00,08 
4928 DATA 88,08,29,00,00,02,00, 
20,22,00,08,20,20,20,00,08 
4238 DATA 90,90,20,28,00,00,00, 
00 ,00,00,29,00,20,29,44,88 
ABAa DATA 44,CC,C0,89,908,00,44, 
DC,FC,EC,98,38,29,DC,FC,FC 
AUSB DATA RC,8B,9G,44 ,FE,AC,AC, 
SC,40,08,44,AC,CC,CC,CC,AC 
4068 DATA 98,BC,CC,BE,2C,At,BBy, 
27,84,C09,0C,84,48,90,08,48 
4972 DATA. 06,09,09,00,48,098,40, 
03,206,48,54,49,00,00,01,23 
sa0z DATA 03,0C,88,90,20,40,81, 
03,42,20,00,40,90,49,C90,C0 
4270 DATA 80,00,20,00,49,00,08, 
02 ,00,20,00,20,29,09,22,20 
4120 DATA 99,20,09,09,00,00,00, 
22,00,20,09,20,00,09,00,44 


® 
22,8C,CC,00, GBR OR AA RE 
4128 DATA 2C,88,28,02,44,80,4C, 
EC,4C,20,44,8C ,9C,DE,EC,AC 
4138 DATA Q9,9C,2C ,CC,FC,FC,BB, 
08,84 ,0C.,00,93,23,890,09,40 
4142 DATA 84,00,01,42,48,00,RB, 
48,24 ,48,53,48,20,20,00,44 
s159 DATA 0C,0C,09,00,00,00,00, 
84 ,C09,29,00,00,49,08,C9,08 
4150 DATA 99,00,00,09,00,09,u0, 


DR ,OR,2Q,nD,00,20,29,00,09 
4178 DATA 09,998,02,220,08,00,08, 
3R,dR,02,00,08,00,00,29,44 
4188 DATA CC,CC,CC,CC,09,802,00, 
ac „2c,20,00,00,099,40,09,8C 
41394 DATA 48,C09,90,09,09,09,CQ, 
B9,44,29,08,990,CC0,4C,C00,88 
4200 DATA aD, 20, CL, ce ‚ac, AC,A8, 
20,20,C9,C9, 84, 4a ‚28,00, a0 . 
4219 DATA 08, ca, 48,C0,82,00,00, 
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28,02,CC,.08,40,90,08,44,CC 
4220 DATA BC,4C,CC,09,08,8C,0C, 
BC ,EC,89,09,09,430.C8,C00,09 
42358 DATA CB,00,00,09,00,08,80, 
M,00,02,00,00,00,00,20,00 
4248 DATA 80,00,29,00,00,04,00, 
Dp,2n,20,00,20,00,20,20,44 
4250 DATA CO,CC,CC,U0,00,g0,0R, 
48,8C0,0C,88,20,20,29,29,C0 
4260 DATA 8C,42,00,09,44,00,08, 
84 ‚40, 00,@9,DC,C6,88,49,40 
4270 DATA 08,44, AC,FC,EC,CH,AC, 
00,40,24,93,42,C4,48,00,08. 
4289 DATA 81,C0,80,44,48,00,00, 
40,00, 00,8C,48,20, 02,02 ,00 
4290 DATA CC,2C,48,28,08,08,49, 
©C,2C,80,08,090,490,C0,C0,C0 
4308 DATA 08,02,09,00,08,20,08, 
29,00 ,09,20,00,200,00,00,00 
4319 DATA 29,20,20,00,00,20,00, 
20,00,20,20,42,20,00,29,00 
4328 DATA 08,44,CC,00,00,20,08, 
CE,DE,FC,80,09,44,CC,FC,FC 
4538 DATA FC,88,00,DC,FC,CC,CO, 
CC ,EC,8B,44,CC,@0,40,CC,CC 
4349 DATA QU,AC,AC,CC,8C,0c,08, 
200,84,00,08,84,20,990,20,48 
4359 DATA C2,0C,48,C09,60,00,81, 
23,00,C0,00,42,09,49,C0,03 
4568 DATA 03,285,80,98,02,00,C0, 
81,93,80,22,09,29,09,49,C8 
4378 DATA 20,90,00,29,20,20,00, 
20,20,029,20,00,00,00,00,2@ 
4380 DATA 20,09,29,28,00,20,00, 
20,20 ,20,00,20,00,00,00,00 


| 437@ DATA 44,08,29,20,00,00,CC, 


BC,40,CC,C0,09,29,44,0C,0C 


49a DATA B4,4C,020,90,8C,2C,8C, 


48,04,00,44,8C,CC,CC,@0,88 
4818 DATA BO,BC,CC,AC,AC,BC,AC, 
29,B4,00,48,48,84,48,902,48 
4428 DATA 8C,C2,C9,00,99,00,00, 
84,BC,83,4C,C8,09,02,49,0C 

4430 DATA @C,8C,48,20,00,00,84, 
48,C0,09,09,20,29,49,59,88 
4440 DATA 22,90,20,00,29,20,08, 
08 ,00,20,90,00,@0, „es, 7) 
4450 DATA 00,00,00, ‚20,20, 
08,00, 09,09,02,00, 
4460 DATA 00,29,00, 
20 ,02,02,22,02,02, 
4470 DATA 20,00, 
02,00,28,00,02,41, 
A480 DATA @0,00,00, 
20,00,08,92,82,08, 
4492 DATA BO,GR, 
20,41,41,00,28, 
4508 DATA @0,aR 
02,00,29,08,00, 
4510 DATA @0,08 
09.,00,29,90,00, 
4522 DATA 00,00, 
09,20,00,20,00, 
4538 DATA 09,00,0 
20,00,20,29,20,00, 
4540 DATA 2a „20.08.00, 00.00.00, 
Dn,2R,20,00,20,09,02,82,08 
4558 DATA 09,00,00,4P,05,05,00, 
20,20,20,00,2N,82,28,20,08 
aS&B DATA 02,04,08,05,08,00,08, 
29,05,87,00, 00,02 „00.00.00 


>82: 
88: 
S- 3: 
338: 
“ 
- “ 


8» 


” 


8“ 
8« 2» 2 
- 
8 
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8 
su8s 
88 8 

“ 


2 
3525: 
8%: “«B“ 
3“ 888 
“ 
Ss 
558 


5.353,5, 
7873 3: 
“ “ “ ” 
Bu82 35883 
S-87 875 
- - 63 + 
ig * 8: + 
528252 
- “ * 
a» ” S% 
s°3 
8 
F 3 
“ “ 


4588 DATA 00,20,00,09,00,08,00, 
22,20 ‚2D,00,00,00,00,00,00 
4598 DATA 08,00,90,00,00,00,00, 
27,20 ,02,Rp,0n,an,00,00,00 
A460 DATA 0B,20,00,00,00,00,00, 
29,,00,020,00,00,00,040,05,41 
4610 DATA 95,00,00,00,00,41,4B, 
48,00,00,00,02,00,87,82,8@ 
4620 DATA 00,08,05,05,04,0F,@5, 


.22,08,00,09,97,02,20,02,08 


4630 DATA 99,41,4B,4B,02,00,90, 
29,05,41.95,00,090,090,20,08 
4640 DATA 20.900 ,AN.AN,22.00.2R, 


KA) 
{KC} 
tun} 


<DL> 
<HEI 
{EN} 
{FD 
<L.03 
[de1=2) 
10) 
(613 
<L13 
{LB} 
<PAI 
(Pr 
CHPI 
<mM} 
<033 
cım 
cBA} 
{PH} 
Ka} 
{MN} 
{DK} 
{HP} 
iKc3 
cıL3 
tan} 
{FC} | 
tBH} 
{GE} 
DJ} 
{ND} 
t0K} 
{CK} 
“MN | 
{DK} 
{HP} 
<BP} 
{EF} 
cıK 
<0E> 
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29,09,29,00,09,20,09,20,00 
4658 DATA 99,00,00,00,00,00,08, 
29,00,29,20,02,20,98,09,08 
4669 DATA 09,09, 09,09,00,B2,08, 
09,08,99,00,00,29,20,02,88 
4670 DATA 90,00,00,00,02,08,00, 
05,41 ,25,00,82,22,02,82,48 
4680 DATA 0A,82,20,20,08,431,0R, 
4B,09,00,29,29,0%,4B,BA,QA 
4690 DATA 99,09,41,82,87,82,C03, 
20,00,00,00,4R,un,An,8R,d0 
4720 DATA 80,0A,0A,4B,20,00,08, 
2@0,41,4B,0N,82,20,098,00,87 
4718 DATA 41,05,098,00,00,00,00, 
20,00 ,090,09,10,00,00,00,0@ 
4729 DATA 08,09,00,208,00,20,00, 
29,00,00,00,00,08,00,00,9%0 
4738 DATA 08,00,00,80,00,00,00, 
20,20,20,00,02,20,20,00,B2 
4748 DATA @9,0A,82,41,00,90,08, 
8A,98,95,29,02,20,00,82,4B 
4758 DATA 09,02,09,00,05,41,08, 
48,04 ,20,00,00,2N,41,25,00 
4768 DATA 08,00,04,05,02,48,05, 
29,09,05,00,090,87,28,00,00 
4778 DATA 41,05,41,08,0A,00,00, 
20,24,05,41,95,092,00,05,08 
4780 DATA 87,84,82,00,08,09,A1, 
24,05,200,090,09,41,28,41,08 
4790 DATA 41,00,08,00,08,00,00, 
20,02,09,00,na,20,20,00,00 
A402 DATA 20,09,00,20,00,08,00, 
20,00,290.00,00,20,00,00,08 
aB1a DATA 95,05,05,00,00,Md,00, 
20,82,92,00,00,20,05,00,209 
4922 DATA 09,05,24,99,00,41,08, 
41,80,00,00,29,00,41,0@,2 
4838 DATA 09,09,05,82,82,82,87, 


0 LAäBF:READ a$=:POKE 1,VvALt"K"+ 


programme 


ENDE DES LISTINGS 


<ML} | 00,00,20,00,41,20,00,00,02 NNr| as)snExXT i [412] 
4538 DATA 29,41,80,41,00,09,00, 5039 RETURN TEA} 

{DI} | W5,09,20,00,25,09,09,00,00 {EH>| 5048 ' " tPKa> 
4858 DATA 82,82,09,20,00,29,05, 5058 DATA 08,8C,808,00,44,4C, 08, 

{MN} | 05,205,08,00,09,09,09,00,20 {FB}! 8C,00,41,48,00,07,07,00,41 {ADC} 
484Q@ DATA 99,22,20,02,00,00,00, SOAA DATA 4B,08,2A,C35,DB,41,0%, 

IN} | 70,00,00,00,00,00,00,090,00 mL! 09,89,03,00,85,97,00,43B,82 to} 
4978 DATA 00,29,092,00,20,00,00, 5978 Dein 86,05,87,00,41,41,08, 

{897 | 29,09 ,00,09,00,00,20,00,00 <D13| ©3,82,00,41,41,20,41,91,00 CDN}F 
4888 DATA 29,00,00,29,00,20,00, SaBa DATA 87,C03,00,41,41,00,00, 

um! 9,05,08,08,00,00,29,05,85 <Ba>| OF ,20,87,82,00,20,0F,00,00 ER} 
4898 DATA 95,08,20,20,20,00,4i, 5072 DATA 80,40,02,09,00,a0,00, 

{FB} | 99,090,20,009,20,20,82,92,8@ iLcy! 09,09,00,08,08,29,00 20.00 ALF} 
4909 DATA 99,08,00,0F,4B,@aF,@A, sıro ' i h AP} 

{MN | 20,00,00,20,82,92,09,09,@ <er)| 5i1i@ RESTORE S@5@: FOR i=&B40@' T 

- 4918 DATA 09,00,41,29,20,00,00, O0 &BAA4F=SRERD asıPOKE i ,„VALL"&"+ 

{FC} | 29,95,25,05,00,20,20,20,80 terr| a®) NEXT i tFP} 
49290 DATA 05,20,00,09,00,08,00, 5128 RETURN {CA} 

{DB} | 20,00,28,02,29,20,00,09,00 <HPI| 5150 " <Pr} 
4938 DATA 28,00,29,00,98,00,09, 3148 MODE Ben=141a#="DOUBLE TRO 

{DK} | 09,00,29,00,20,20,09,20,08 <GF> | UBLE* : {DM} 
4948 DATA 98,09,04,08,22,24,B@, 3159 LOCATE 4,&1FOR i=1 TO LEN 

{Mm} | 09,98,00,02,00,22,00,09,08 irc)| a8) {DD} 
4958 DATA 09,00,290,00,22,098,80, S168 PEN x <ID} 

iFN} | 270,48,00,00,09.04,09,08,20 en | 5170 PRINT MIDE(aF, 1,1’ pa IF nei 
4968 DATA BU,60,08,00,20,20,BA, 4 THEN x=15 ELSE x=14 0A} 

BE} | 0N,2O,00,00,00,02,41,29,00 eb} | FIER NEXT 1 01} 
4978 DATA 02,B0,00,45,87,87,00, 190 LOCATE 5,81PEN Zı PRINT"Pro 

{DL} | 08,08,20,B0,41,00,20,28,00 {NL}| grammiert” 01} 
4780 DATA @B,DD,M,aA,da,a0,0n, 5208 PEN SrLOCATE 9,18=:PRINT”17 

{CH} | AB,A0,00,00,00,00,80,20,08 {ms) | B7" [4 07} 
4994 DATA 00,88,00,20,00,00,00, 521@ PEN ZıLOCATE 1,121PRINT"vo 

{6F} | DB,00,00,00,00,08,20.00,00 {mL} | n Ottfried Schmidt"; <FC} 
Sa00 DATA 09,002,00,020,00,00,20, 5228 FEN INLOCATE 1,153 PRINT"D 

{6M)| 20,02,00,08,00,09,08,00,08 {DI} | RUECKE FEUERKNOPF”$ PL} 
seia ‘ {Ar} | 5230 GOEUB 2548zRETURN {EF} 

<KJ} | 5928 RESTORE 37402 FOR i=tAQaB T 
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HARDWARE 
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341 Software in EI 
n 016/116 198 DM 5 
= 3+7 Ditoin Deutsch 248 DM 3 
0 Umbauset C16/116 64K 50 DM m 
in) Umbau C16/116 64K dl 
0, Gar, 100 DM = 
Mi LOGO für C64 159 DM: A 
mi Jetzt 49,50 DM = 
= Eiektronic Datasette A 
nur 98,50 DM 


Ü Eiektronik-Technik-Peters = 
{7 Tannenwag 9, 2351 Trappen- = 
Se D 
SODODOODOBODDEBEDD 


Verkaufe 2-Color-Printer CITIZEN 
IDP-560 für Commodore-Gornputer: VB 
280,- DM inc. 2 Programme für ©-16- 
Anwender: ACE, KING-SIZE 

Tel.: 0751/92972 

Frank Hamberger 





Verkaufe C16+64KB, Datasette, 50 
Spiele, Joystick, Bücher I! 

Preis nach Vereinbarungt 

Angebote an: M. Lammet, 





1  Falterweg 11, 
} 4450 Lingen 
L 
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IE 


Verkaufe Commodore G-1& + 64KB + 
py 1515 + Datasette+ 60 Spiele 
(favourite 4} + Joystick + Netzteil (na- 
gelneu), Alles zusammen für 500 DM 
Tel.: 04821/85633 wird u.U. zugesandt! 


FERN 


Kiste AaMUmbaun 6% 

* KBYTE * 

* in 1. Tag für 100 DM nur bei mir 

* kostenl. Durchs. auch Reparatur 
** beim Gomputerfachmann ** 
Noch Fragen? Freiumschlag an: * 

* Elektronik-Technik-Peters * 
Tannenweg 9, 2351 Trappen- * 

* kamp 


ie 
FREIE FFFEK EEK 


Verkaufe Commodore C-16, Hand- 
buch, BASIC-Kurs, kaum benutzt, DM 
120,- VB, Tel.: 0431/729104 





Verkaufe C-16 + Datasstte + 
Joystick-Adapter + 64K + Spiele + 
BASIG-Kurs-für nur 250 DM. 
Angebote unter Tel.: 06227/51905 


C-18/116/Plus 4***C-16/116/Plus 4 


USER-Port mit 6522 nur 45,- DM 
USER-Poör Centranics 55,-D 

Kass. Kopiermode! 69,- DM 
Disketten 2D 10 St. 9,90 DM 
Drucker ab ,‚— DM 


Info: Willi Keßler-Elektronik 
Ruprechtsstr, 14, 

6736 Edesheim, 

Tel.: 06323/7114 (nach 17 Uhr) 





H Für Ci@116/Plus 4 Preiswert m 
EM Turbotape Super (64K) 19,50 DM 8 
MI Elektronik Datasette 99,50 DM EI 


03,1 Software I 
Englisch 198,00 DM - 
3+1 Software ge 
m Deutsch 248,00 DM 


m Plus 4 geprüfte Ware 298,00 DM m 

iM Plus 4 dito deutsch 348,00 DM m 

M Floppy 1551 Aestp. 389,00 DM M 

I Elektronik-Technik-Peters - 

u Tannenweg 9, 2361 Trappen- - 
kamp 


VC-20 Freunde aufgepaßt: 

ich verkaufe eine 32K-Erweiterung um- 
Fe aa von 3K-32K. Preis: nur 160 
DM! 

Tel.: 02565/2997, Martin verlangen 





Titan-Computer 


SH Tale EI c 151-W 


Verkaufe C-16 1 ‚Jahr alt + Datasatte 
+ Joystick + 25 Top-Games u.a. (Win- 
tar Olympiade} + Hafte (2) VB: 400 DM 
meiden bei: 

Tel.: 02801/3307, Sascha verlangen 





© PLUS 4+ +PLUS4+ +PLUS4 5 
„ Patenfernübertragung jetzt nur 
® ein ‚Kinderspiel, 

„ DFU Komplettanlage bestehend 
# aus Adapter, Modem (ohne FT2.- 
e Nr.) und Supersoftware, Wählen 
# von der Computertastatur: 

“ * WAHLWIEDERHOLUNG 

®.* AUTOANSWER 

® * MAILBOXBETRIEB 

® * 229, DM ** 

® Ihr DFÜ-Spezialist 

® GUSS DATA CONNECTION, 

5 Tel.: 02728/8679 


VBSEO ORRHEHS 


009082900000408 


3446 Meinhard 


Tel. (05651) 70165 


10 Disketten 51/4 " 1D 


10er Pack 7,50 DM 


Software für C-16/116/Plus 4/64-128 ab 9,90. DM 
Umrüstung 64K und 128K ab 89, —- DM 


Joystick ab 9,50 DM » IMB-Kompatible ab 1750,— DM 


Preisliste gegen Rückporto 


Händleranfragen erwünscht! 


Versandnur gegen Nachnahme!!! 


Titan-Computer 





Compube mi 


- "Sandstraße 2 
Tel. (05651) 7.0165 





3446 Meinhard 


59 























kleinanzeigen 


Commodore 16/116/Plus/C-64 
Datasstten-Kopf-Justier-Lautsprecher 
zum Abhören der Datasstte: gut geeig- 
net. Bausatz mit ausführlicher Bauanlei- 
tung 15 DM, UMBAU 20, DM. Info ge- 
gen Rückporto: 

Klaus Gerdes, 

Funnix, Siedlung 2, 

2944 Wittmund 2 

Tel.: 04948/783 


“"*Naukelt für CI / +4**"** 
Kopieren von Cassetlenprogrammen 
jetzt endlich mit Zusatzgerät möglich. 
Gratis Info: 

Christian Götz 

Postfach 11 05 18 

6100 Darmstadt 


OO0D0000000000000 


© c16 - DFÜ - C16 - DFÜ - c16 - 2 
9 DFÜ = 
a Datenfernübertragung wird zum ° 
Kinderspiel! ° 
„ Erweitstungsplatine >USMOI< ö 
o für C16/116 mit AS-232 und zwei o 
o Userports für DM 138,-1 
o Modem steckfertig mit passen- 
© der Software {ohne FTZ-Nr.}: 
* Wahl von der Computertastatur 
° * Auloanswer 
© ürerrsnend DM De 
ererweiterui » 
5 Chıss Data Sa. 
o Tel.: 0272316679 
OO00000000000000 


Verkaufe C-16 + Datasette + Joystick 
+ Buch+ Spiele für 195 DM. Wenig 
Gebrauchsspuren, 

Kt r Banko 

‚Alte Poststr. 14 

4577 Nortrup 

Tel.: 05436/2865 


C-16/116 Commodore C-16/116 
64-KByte Speicher-Erweiterung, Um- 
rüstservice inkl. Rückporto und Bautei- 
ları nur 59,- DM. i 

Zusätzlich mit Speicherumschafter 
64,- DM 


22? WO 27? 
Willi-Keßler-Elektronik 
Ruprechtstr. 14 
6736 Edesheim 


Zu verkaufen: C-63 mit Peripherie, 
Software, und Literatur. Angebote an: 
Olaf Buck, Raithıweg 25, R 

7080 Schorndorf 1 


Verkaufe wegen Systemwechsell 
C-116 mit 69K-RAM {Steckmodul) +: 
Bücher + ‚Joysiok+ BASIC-Lernpro- 
gramm + 7 SPIELE; Neupreis ca. 530 
DM für 250 DM 

Tel. ab 16 Uhr 05484/1724 


Plotter VO 1520/4 Mon. zu verkaufen. 
VS. 220 DM. 

Axel Hoeischer 

Altburgerstr. 6941 

7260 Calw 

Te}.: 07051/20126 


FKERFEFEKKFE K E  K c + 


x SCHWEIZ VIDEOTEX osarı2s # 
% SCHWEIZ Br 
„ Der Testbeirieb ist beandar » 
3 Handel und Banken sind ange- * 
* schlossen an VIDEOTEX * 
% ©641128 können ohne viel Geld zu * 
x bezahlen teilnehmen * Kompleit- 
* Anlage bestehend aus Hard- und 5 
x Software nur FR. 380 

Info auf Anruf Tei.: 02723/6679 *. 


> GUSS DATA CONNECTION x 


BEFKLFKKETRHEHEEKK 





00000000 





C16/64K + Dataseite mit Defekt, An- 
gebote unter: 

Tel.: 08081/4824 Anrufbeantworter » 
Rückruf garantiert.am selben Tagl 


Verkaufe wegen Systemwechsel 
Schneider CPC 464 + Monitor + Flop- 
py + Drucker + 3 Disketten, Preis 
300 DM. b 

Stefan Hoerster, 

Fliederweg 1, 

5630 Remscheid 


G-16 + 64K + Dataseite + Joystick- 
Adapter + ca. 50 Programme auf Tape 
(Yie are..Int. Karate, Saboteur usw.) + 
9 Bücher + 10 Sonderhefte + sonsti- 
ges evil. 5 Disk ca. 100 Programme, VB: 
700 DM, 

Tel.: 0208/8651962, THOMAS 


Verkaufe VC-20 + Programmierhand- 
buch +: Spiele + Netzteil + VC-20 
Handbuch (fehlen ein paar Selten) für 
nur 150 DM, 

Tei.: 02585/2997, Martin verlangen! - 


LIGHTPEN für C16/116/Plus 4 

erfasst jeden Bildpunkt und übergibt Pa- 
rameter ans Programm. 

Tel.: 02327/320395 ab 17 Uhr 


Verkaufe fast neuen C-16 mit Dataset- 
te, 2 Lernbüchern, BASIC-Lernkassette 
und 30 TOP-GAMES. Preis 300 DM 
oder tausche gegen C-&4 mit Datasettel 
Teal.: 059235159 


VERSCHIEDENES 





C-16/11&/Plus 4-USER 
Suche Commodore Sonderheft mit 
Schaltplan der Großtastatur für den 
Gummieumel {C-116). Organisiere Ort- 
ginal C-Tatstatur für 20 DM (94 Tasten} 
auch Kopie. Verschicke außerdem 15 
Superspiele bei 10 DM Vorkasse. 
Chess, Ganymede, Alien, Overrun 
ux.m, Wo gibt es noch Clubs in Köln 
oder USER, die den Super-Giub suchen 
? Mit Spielbörse (auch Tausch). 

Heinz Schmidt, 

Appelhofplatz 3-5 

5000 Köln 1 

Tel.: 02211211577 

P.S. Alle Spiele auf Kasselte, suchen 
noch 64K Programme. 


C-16 {64K) 
Ich habe Brenner + Eproms. Wie muß 
un il in’s EPROM, damit e3 


Siegfried Gerken, 
Karnkenhaus, 
2058 Lauenburg 
Eıstatte Kosten I!! 


Hilfe IH 

Komme nicht über die 9, Ebene von 
Ghost-Town (Kingsoft) hinaus! Wie geht 
die Mauer weg ? System PLUS 4, 
Claus-Peter Stein, 

im Lott 3, 3420 Herzberg 4 


Verkaufe ATARI 2600 mit 2 Joysticks 
+ 12 Kassetten + Computeraufsatz, 
VP 450 DM, Schachcom. Super System 


:3 VP 100 DM, Stephan Weber, 


Am Alcher Berg 22, 
5905 Freudenberg 


Hilfe! 

Wer Schenkt mitteliosem Schüler einen 
Plus 4 und/oder eine Floppy 1541 ? 
Bitte ruft 04554/2495 und verlangt Ol, 
bezahle das Porto! 








N Für C18/116/Plus 4 kostenlos! 
2 Infos - Tips - Angebote - Um- 
r bauten! 

*** yom Computerfachmann "** 
= Erweiterungen + Reparaturen. 
n Noch Fragen? Freiumschlag an: 
H Elektronik-Technik-Peters 
= Tannenweg 8 
1 D-2351 Trappenkamp 


Sitleini= 





Suche für VG-20 

Steckmodule: POLEfPosition, Befehls- 
Expander + IK, Skat (evil. auf Kas- 
sette)! 

Suche: Listing "Odyssee 2000” 

Bitte Angebot + Tetefonanr. an: 

M. Nass, 

Ausdeich 80, 

2103 Hamburg 95 


Intakter Drucker gesucht 

Kompatibel zum © 64/+4 nur mit! Ein- 

zelblatteinzug möglichst AYI1 

se unter Tel.: 04541/82238 nach 
r 

P.S. Suche auch Monitor G. 





"Suche C-84 und 1541 bis maximal 400 


DM. Angebote arı: 
Gerhard Buschmann, 
Innsbrucker Str. 6 a, 


8200 Augsburg 
Tel.: 0821/64569 nur am Wochenende! 


Suche 16K für VC-20 

Biete bis 40 DM, melden bei: 

A. Dunkmann, 

Mühlenfeldweg 3, 

5132 Übach-Palenberg 

Tei.: 02451/42252 

Suche Tauschpartner für Spiele und 
Programme auch GY. 


SUCHE I! Software für dan Commodo- 
ta 116, aber günstige. Ihr könnt mich un- 
ter der Telefonnummer 05955/332 errei- 
chen. Aber bitte erst ab 14-16 Uhr. 


ich suche folgende Programme auf 
Kassette für meinen Plus 
Computer: 

« Hardcoppy - Platinenlayout 

Nicht die vom Tronic-Verlag! TOP- 
Programmet Danke 

Speditron 

Postfach 387 

CH-4009 Basel 


Suche für VC-20 16K-Erweiterung und 
Drucker - 

Günstig !!! Sandrina Sasse, 

Kieselstr. 32, 

2071 Hamfelde, 

Tel.: 04154/3936 


Kaufe, Tausche, Verkaufe C-16 und: 
Plus 4 Programme (bevorzugt 84K). Bit- 
te schicke Deine Liste an: 

T, Dohn, 

Beransbergstr. 3, 

Ni.5285 AE Lemiers 

Tel.:{NL) 0445412431 


Tausche GPC 464 Colour 1 Jahr alt ge- 
gen Commodore 64 + Diskettenstation. 
Ich basitze einige Spiele. 

Frank Maly, 

Hauptstr. 47, 

6149 Fürth/Eiteribach 





GSompube mi 


Achtung Plus 4 

Suche anschlußfertigen Drucker, mög- 
lichst neuwertig { Angebote an: 

Helmut Schulte, 

Forststr. 2 a/Oberrieden, 

3497 Bad Sooden-Allendorf 


Suche für C-16 (Einsteiger) 
Diskettenlaufwerk (1551) oder ähnlichen 
Drucker, Farbmonitor, auch einzeln. 
Ferner Software (keine Splelprogram- 
me} zB. Kalkulation, Wärmebedraf, 
elaktr. Technik, Lagerkartei, Ersalzteil- 
listen usw. 

Wer könnte mir eigenes Programm 
schreiben? 

Horst Rasch, 

Nienkampsir. 33, 

4300 Essen 12 


Suche Software auf Diskette für 

G16/Plus 4! Auch Tausch, Listen an: 

Harald Schneider, 

Valenciennersir. 259, 

5160 Dusren 

Suche Kopierprogramme aller Art für 

o.a. Computer, Auch für Tape auf Dis- 

Kenn OINLERII EEE Tape-auf Dis- 
ette). 


Spielhallen-Motorradrennen 

Hang-On von SEGA für PC 128 gesucht 
! Wer weiß, ob und wie man den Fern- 
scehreiber "SIEMENS PT 80° als 
Drucker an den PC 128 anschliessen 
kann? Belohnung | Zuschrift bitte an: 
Erwin Spanner, 

A-8920 Hieflau 46 


Suche quterhaltenen Drucker und 
Floppy für den C-16. Angebote unter: 
Horst Kruss, 

Max-Beckmann-Str. 23, 

2300 Oidenburg 


Suche Drucker MPS - 801 bis 150,- 
DM. Angebote an: 

Michael Häger, 

Lahnstr. 9, 

5800 Hagen | 


C165/Plus 4 Fioppy 1551 gesucht. An- 
gebote einzein oder Beides unter Tel.: 
08081/4824 Anrufbeantworter, 

Rückruf garantiert am selben Tag !!l 


Suche dringend für PLUS 4 preiswer- 
ten PASCAL-Compiler möglichst auf 
Steckmodul: 

Klaus Pöttering, 

Nachtigallenstag 38, 

2490 Lübeck 1 


Suche Schaltpläne für PLUS 4 
Fioppys 1541 + 1551, C-1281 

Kaufe C-84 + Floppy zahle um 300 DM. 
Petros Runck, 

Immertenstr. 18, 

7520 Bruchsal 4 


"""Suche Floppy 1551*** 

muß o.k. sein, suche auch Software und 
Zubehör für Plus 4 Möglichst mit kurzer 
Beschreibung! Suche "Compute mil“ 
Ausgaben bis 2/87. + Sonderhefte. 
Schreibt an: 

Torsten Gädscken 

Bahnhofstr. 6 

2882 Ovelgönne 1 

*+ES EILT Ii*“ 


KONTAKTE 





The last HAC-PAC 

Is searching for new software II! 
Gall 02325/77817 

C64PC 128/Disk oniyf 


5187 

















DIN LO > EEG 

, Huppert, Ferlingsweg 15, 

4150 Krefeid 1 

Für Anfänger + Fortgeschrittene. Info 
gegen 50 Pf. Porto. Tests, Berichte, Pro- 
grammierkurse, Sammelbest. Pro- 
gramme!| . 


C-16 Einsteiger sucht. Tauschpartner. 
A für Plus 4. Bitte schreibt an: 


us Kostte, 
Schluot 12, 4407 Emsdetten 
Ich beantworte jede Zuschrift! 


Tausche und verkaufe Saftware für. 


Commodore C-16/Plus 4. Kassette oder 

Disk. nen en! Monitor oder 

tragbaren TV im Tausch gegen Softwa- 
04263/8333 


re! Tel.: 
Freitag 18 Uhr bis Sonntag 18 Uhr. 


Tauschpartner gesucht 

Tausche Software CPC 664/6128 {nur 
Diskette),Schickt Eure Listen an: 
Christian Schubert, 

Am Warthberg 8, 93254 Emmerthal 2 
Tel.: 05157/457 


Ciub-New"Club-New"Ciub-New 
Commodore C-16/116/Plus 4, C-64, LA- 
SER, ATARI, Hewlett Packard; Entwick- 
lung und Vertrieb von Software und 
Hardware. 

Tips, Hilfe, Kontakte, tricks, Verkauf von 
Mitgliedersoftware; 


ALLROUND SOFTWARE 
PRODUCTIONS 
Königstr. 37 A, 7144 Asperg 


PLUS/4 - C-16-Anwender 

Einsteiger: endlich ein Club speziell für 
uns, Info beim HAC e.V. Laschinsky, 
Bauerland 15, 4800 Bielefeld 1 


21/73 
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FREIE HK 


Kre= Für GiemiepLusa ** * 
* Umbau C16/116 

* garant. 

* Umbauset C16/116 nur 
* Turbotape Super = 
’* nur 19,50 DM 
* Plus 4 in Deutsch nur 348 Di 
ke Elektronikdatasette 

* nur 98,50 D| 
* Floppy 1551 die Feste 389 
K LOGO für C#64 159 D 
* nun 49,50 D 
* Elaktronik-Technik-Peters 

* Tannenweg 9, 

% 2351 Trappenkamp 


BELLE Tr 


= 


z2 


z=S 
EHER 


Zu verkaufen: 

Software (ORIGINAL NEUN) C-16M16/ 
Pius 41! Info gegen Rückporto bei; 
Joachim Seufferle 

Ehristallerweg 3, 7060 Schomdorf 1 


Ct6/Pius 41 Endlich! H 
Digitalisierte Bilder auf dem C-16/Plus 4. 
2 heiße Die-Show’s mit tollen Girls für 
nur 20 DM. Lieferbar nur gegen Vorkas- 
se und nur auf Diskette. Abgabe nur mit 
Altersnachweis (18 J.) bei: 

Jürgen Poumen 

Eichenstr. 49, 4054 Nettetal 1 


kleinanzeigen 


Biete Spiele-Diskette für C-64 

Nur für Privatgebrauch. Erlesene Soft- 

ware zum Selbstkostenpreis. 10 OM 
orkasse - Schein in Brief oder 
heck). Am besten sofort bestellen 

oder Info-Material anfordern. 

Gert Kaczmarek 

Erkstr. 16, 1000 Berlin 44, 

Tel.: 030/6861534 


Wer uns nich kennt, hat echt ver- 
pennt! 
Jetzt noch größeres Softwareangebot 
für alle gängigen Home- und Personal- 
computer. Brandheiße Hardw: 
bote. Alles zu coolen Preisen und Ver- 
sandbest., die stimmen, Gratislisten an- 
rue: 

itanic-Supersoft 
Simonssitr. 8, 5600 Wuppertal 1 
Tel.: 0202/306795 


C-16 Software zu verkaufen 

Solitaire, 007, Froggy, Surround, City- 
Aunner, Turmspringen usw. 20 Spiele 
auf Data und Disk für 20 DM. Schickt 
20-Mark-Schein an: 

Inge Taws, Kielerstr. 26 

2214 Hohenlockstedt und Ihr erhaltet 
sofort Eure Software! 


Verkaufe meine Games (17) für den 
Plus 4! Dabei: Winter Games! Nur alla 
17 im Paket! Tapa! Angebote an: 

L Lammel 
Falterweg 11, 4450 Lingen 
Porto nicht vergessen! 


Verkaufe-Spiele-VC 20-Steckmodule 
Gorf-Poker-Hoadrace + Ik Erweiterung 
Carsten Andreas Paulsen 

Getränke Großhandling 

2255 Langenhorn, Tel: 04872/212 


84 +C-16 +Plus 4 

Techn Mathe + Schulanw. + Gar- 
tikprg. zu reellem Preis, wahlw. 
Cass/Disk- BDreieck-Volum., Bruch- 
rechn., Vokabeln, Geschwindk,, E- 
Techrik, Festigk., Zahnradber., Hydra- 
Pneum., Kurvendarst., Super-Grafikprg, 
Paksta preiswert + gut. Katalog 1 DM- 
Briefmarke-Computertyp angeben!li 
Softwareversand A. Ristau 

Peetzwag 9 

39 Salzgitter 1 





zureenn PLUS 4 EITIIET 
Mercenary 

Mercenary-And City 

Bridge Head 

European Games 


Sports 4 

Winter Events 

19 Disketten 5.25* 1D 
Fred Martschin 
Postfach 49 

3258 Asızen 1 

Tel: 05454/1496 


SRRERRIE 
z222228 


VC-20***VC-20***"VC-20*** 

Soft- und Hardware bis zu 90% redu- 
ziert, Infos gegen 1,20 DM bei: 
Francisco Segovia, 

Nordwaldersir. 83 

9407 Emsdetten 


Achtung VC-20 Besitzeri 
Supersoftware zu unglaublichen Prei 
‚sen! Info kostenlos! 

X-TAA Datendienst 

Colmarersir. 57 

7000 Stuttgart 40 





Coole Software für alle Freaks! 


Commodore 16/116/Plus 4 





ACE 

ACE (+64K) 
Ghost'n Goblins 

H ts 
Internäljonal Karate 
ROM-Listing (Buch) 
RAMBO 





Saboteur (+64KB) 
Scoohy-Doo 
Space Pilot 

Sport Show 

The way ottheexpl. fist 29,95 
Winter Olympiade 

Yie ar Kung-Fu 


Amiga 





Kassette 
29.95 
25,00 
19,95 
25.00 


#acker A 


Narble 


World Games 


Di 
Defender ol ihe Crown 98,30 
7A, 
Holiywood Poker 
Leader Board 


Madness 
The Halley Projekt 
The Pawr 


Atari ST 
iskette | 


Gauntlet 
Hollywood Poker 
Karate Kid) 
Renegade 
Fe 

er Oycle 
Wera Games 


Kassette 


Diske 
Championship Wresting 69.90 
0 





As 




















ZzA- a 
Samurai 













1942 95 Ninja 14,95 - 

City Cobra 32.95 - Scooby-Doa ä +4,95 ed rl 
Flash Gordon 14.95 5 Super Oyrfe 92.95 44.95 ABIERE 1" n/ 
Gauntlel 32,95 44,95 Teivial Pursuit (deutsch; 38,95 48,95 er Varta 
Destroyer - 44.85 Viotnam 25 4495 u 7) 
Hollywood Poker - 49,00 World Games 25 44,95 

Howard ihe duck 32,95 48,95 zu8 14.95 -. 

Labyrinth A 





SOETWARE VERSAND Versand erfolgt gegen Nachnahme (+4,— DM Porto) oder 


i ANDREAS BACHLER 


Vorkasse (Bar, Scheck) 
' POSTFACH 429 | 
D-4290 BOCHOLT Fordern Sie unter Angabe Ihres Computertyps kostenloses 


= (02871) 183088 iInformationsmaterial über unser Lieferprogramm an! 








Compube mib 





61 











© | RT. 
kleinanzeigen 


O=Oassette D=Diskette 


Sie kostenlos Informatiansmaterlal anl 


c-16 Klassesoftware ab 1 DM 
Verkaufe eigene Programme z.B. Sen- 
50, Morser... Info gegen -,80 PF. 
Schreibt an Daniel Schöb 

Postfach 40 « 
8627 Redwitz x 


C-18/118/Plus 4 - Superspiele 
info gegen Rückporto bei’ 
Hannes Kaltenbach, 
Prieimayerstr, 16 

7990 Friedrichshafen 1 


G-18/118/ +4 

Verkaufe über 50 Programme, 2.B. Hor- 
ro Castle, Pac-Mac, Hero, Hamurabi, 
Red over Russia, Gun-man, Helmut, 
Diam, Black-Jack usw. 

Info bei U. Hagedorn, 

Tel.: 05495/682 


C-54 Besitzer 

Verkaufe 10 originalverpackte Spiele at- 
ie auf Kassetten zusammen 45 DM ein- 
sch}. Nachnahme. 

Günter Meister 

Eichendorff-Ring 73 

8772 Marktheidenfeid 








Computer Hard-& Software 
Werner Wohlfahrtstätter 
Postfach 301033, 4000 Düsseldorf 


C#64 z.B. K D 

Destroysr 39,90 
Super Cycle 29,00 39,90 
Top Gun 29,90 39,90 
Trvial Pursuit 38,00 44,90 


&-16 z.B. 
Internat. Karate 
Karate King 
Utility C16 deut. 


19,50 
19,50 
19,00 


Schneider CPC-464 z.B, 
Basic Compiler 39,99 54,00 
Konamis Golf 2790 33% 
Top Gun 26,90 36,90 
ser zB. 

] 0,50 


Sn 2,50 
Epson MX80, FX80, MX90, Lan 12 
Modem 
Dataphon 821-2 ab 229,00 


Katalog 68000 6/87 anfordern _ 
BITTE COMPUTER ANGEBEN 


Vergleichen Sie die Preise, denn 
Top-Software zu Top-Preisen gibt es nur bei 


USS Software-Eilversand 
G-16/ +4 C-64 
Ghost'n Goblins  C 19,95 Dragons Lair II C 29,90 
Karate King C 19,95  Firelord C 22,90 
Kikstart © 990 Firelord D 31,90 
Pin Point G 18,96 Fistll C 31,90 
Saboteur (64K/+4) C 27,90 Gauntlet GC 31,90 
Scoohy-Doo C 24,90 Gauntlet D 44,90 
Spiderman G 995 Sky Runner D 34,95 
Trailblazer C 19,95 Terra Cresta 'D 31,90 
Turbo Tape © 18,95 World Games © 33,90 
Tutti Frutti C 990 World Games D 44,90 


ihre Bestellung können Sie noch heute einfach telefonisch aufgeben oder fordern 


USS Markstraße 196 - 4904 Enger 
Telefon (05224) 53 16 


0000000890900080800800808000980000 





“mr WAHNSINNI **°** 

CP/M, Schneider-, ATARI datenkompa- 
tipel, Basic nach ANSI integr. deutsche 
Textverarbeit, und noch viel mehr. Alles 
mit einem System? Na klar, die neuen 
Enterprise setzen Standards. 
DM 198,- zu haben. Schnell unsere In- 
fo's anfordem bei: 

Titanic Supersoft 

Simonsstr. 8 

5600 Wuppertal 1 

Tel.: 0202/306795 


**C-16/116/Plus 4 Software** 

30 Topspiele auf Org.-Kassetten nur 6 
DM, Bic-Mac/Street-Olympic, Spectipe- 
de, Tutti-Frutti, Berks 3 Oiympiad, Alock- 
man, BMX-Racars usw. 

Nur 9 DM C1 6-Ciassios, Jetbrix, Out on 
a limb, Petch, Torpedo-Aun, Kung-Fu- 
Kid, Bomb-Jack usw. 

Michael Binder 

Josef-Haydnstr. 7 

8200 Rosenheim 

Tet.: 08031/86693 





C-16 Jet-Set Willy 2 22. DM 
©-16 Pinpoint 19 DOM 
0-16 Space2 19 DM 
C-16 Scooby Doo - der Hit 22 DM 
C©-16 Trailblazer 19 DM 
C-16 Turbo Base+ Text 39 DM 
C-16 Netrun 15 DM 
C-16 European Games 22 DM 
Fred Martschin 

Postfach 49 

3258 Aerzen 1 

Tel.: 05154/1495 

C-84 Programmverwaltung ©-128 


Bis 1009 Titel - DIA einlesarı, Druckli- 
starı - suchen - sortieren! Nur 15 DM + 
NN - Info gegen Rückumschlag bei: 
Uwe Krüger 

Königsstr, 28 a 

3100 Celle 





EROTIKA-außergewöhnliches Adventur 
re, aufregende Bilder, 3 Disks, deutsch, 
C-54, für 29,95 DM + NN, EROTIKA II 
für 19,95 DM, beide zusammen für 
39.95 DM: 

H. Schmidt 

Louise-Schroeder-Str. 7 

3000 Hannover 61 





Schon ab 


" 


COMPUTERS 








c16 Disk Cass Cıe 


Achtung C15 Fans!t 


Commodore C-16/116/Plus 4 

Biete 20 Top-Games für nur 10 DMIH LE 
ste anfordern (nur mt Aückporto) bei: 
Fioland Schnotz, 

Heimgartenweg 2 a 

8532 Bad Windsheim 


C-16 GAMES 

Catacombs, Affenwurf, Hamurabi, Ko- 

bra, Robert, Flowers, Meteorsturm, m} 

gn oder Pyramid, Fe A ni 

haolin, Phantom, Husycobra, Mac 

Cein, Vietnam, Hostage für 10 DM + 

Porta oder 20 Games (Trickydices, 

Kane) Joe, SGS, 5DI, Mimi, Golf, Po- 
ker...) für 20 DM. Info gogen Porto bei: 

Horst Meyer, Overgünne 89 

4600 Dortmund 80 


c-18/1 16/Plus4 

Software ’87 Turbo-Tape 5DM * Tom + 
Bongo 8 DM * Sex-Games 5 DM * In- 
dorsoccer 10 DM * Alle Spiele sind Ori- 
ginale !! 

Info beim: 

Computer-Glub- Heichrath- 1985 
Andreas Broich 

Broichstr. 6 

4048 Grevenbroich 5 

Wir nehmen nach Mitglieder auf! Mind.- 
Beitrag 5 DM/Jahr. ° 

Falls Mitglied Spiel = 1/2 PRO111 


Achtung C-16 Freundeilt 

6 Spiele: Buggy, Quiz, Tennis usw. zum 
Preis von nus 10. DM. Bestelları bei: 
Jens Pualus, 

Danzigerstr, 18 

4132 Kamp-Lintfort 


30 C-16 Supersplele auf Kassette für 
nur 20 DM + 5 DM Porta und Var- 
packung (nur Vorkasse), z.B. Genesis, 
Rom, Musik Compiler ... auch einzeln! 
Tel.: 06182/4350 


C-16 Programme billig zu verkaufen. 
Fordent Liste an: 

J. Schramme 

Postfach 16 31 - 

9260 Rinteln 1 


Verkaufe 20 Splele und 5 Anwender- 
programme für nur 20 DM, Schickt ei- 
nen 20Nark-Schein an: 

Ralf Sturm 

Zum Schmiedebrink 4 

3352 Einbeck 1 

Tel.: 05561/8478 





nen! spe) 44, 32,— BiunderlPlanet Search 29.- Summer Gamssl 19,90 9.00 

Poker (Pius) 19,90 9,90 Fantball Manager 23.- Molecule Man 390 
EM Racers 9,90 Future Shock 29.- Masterchass 9,9 
Bouble Trouble 9,90 Internationat Karate 29,= Sport ofKıngs 14,9% 
Dangerzone 930 Thai Boxing 29,- Jesp Command 14,90 
Fingers Melone 9,90 Wimbledon (Tennis) 29,- HandballMaradonna 29,— 
G-Man 9,30 Winter Events 29,- Magic Madness 39,- 20,- 
Fowerbali 9,30 Short Circuit 46,- 32,- 
Megabolls 9 JetSat Willy 39,- 29,- Double Take #9, M,- 
Molecule Man 29 ADE Ir CombatEm.laland8, - 42,- Mutants 54,- 32,- 
‚One Man and his Drois 9% Bridgahaed 39,- World Games 54,- 34,- 
Spead Kin: 9.39 Jump Jet 39.- Labyrinth 56,- 3,- 
Bandits at 14,90 Karate King 29,- Knuckkebusiers B4,- 38,- 
Hustler 19,—  Marcanary Compend am 54,- Güonship 59,- 49,— 
Panic Pengun 18,- Split Personaliti 29,- America's Qup 54,- 36,— 
$paceni (2 Programme) 19,- Step Poker 5 39,- Allans 5- 6,- 


Si sind da, he C5J GAMES 1 (Sun Straat, Danger Pamonds, The Jolly Good Fell = 3 Spiele) Cast 
FURBGTAPE + AZIMUTH TAPE (12facher Turka + Darasattaneinstellprggramm; Siene Auen errbarkm KEN aTase 


CSJ COMPUTERSOFT JONKGK INFRAGEN ERWÜNSCHT * 

‚An der Tiefenriede 27 - 3006 Hannover 1 + Tel, Bestellservice 05111/686303 
Riesenauswahl an Software - sofort CSJ NEWS (Prakeiieken] andren ° Compukertrp un- 
PAR geben. Mindestestelhwert 3,- DM. Versen: Vorkaszn + 2.50 DM, par Nachnahme +4,- DI 


w 


OFTJONIGK 
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* HÄNDLERA 






WIR LIEFERN NEUE SOFTWARE FÜR 
Commodore C-16/C-116/PLUS 4/C-54/ 


C-12B/AMIGA, Schneider 464/664/ 
6128, ATARI 800/800 XL/130XL/260 ST/ 
520 ST/1040 ST, Liste anfordern von: 
BERLAU-SOFT 


Postfach 14 15 
2150 Buxtehude 


yekaite ae für 
Liste gegen Rückporto bei: 
Udo Luecke x 


Gewerbegebiet 6 
3477 Marienmuenster 1 
Suche 64K-Steckmoduttl! 


C-16/Plus 41 

Spiele und Anwender-Programme er: 1 
OM pro Stück, auch spezielle 
Versionen bei: 

Jürgen Roumen 

Eichenstr, 49 

4054 Nettetal 1 

Liste gegen Rückumschlag! 


RITISISPEZIALVERSAND RTT:S 


C64/15 MSX ATARI XU/ST/AMIGA 
SCHNEIDER SPC 


Über 300 C84 Software-Titel 
Über 100 © 16 Software-Titel 
Über 260 MSX Software-Titel 
Über 100 XL Software-Titel 
Über 50 ST ' Software-Titel 
Über 10 AMI Söftware-Titel 
Über 170 GPO Software-Titel 


Auf Kassetten und Disketten 


Unser neuer Service 
Zahlen Sie Ihre Rechnung in 3, 5 
oder 7 Monatsbeträgen. Bei einem 
Betrag von 250 DM zahlen Sie 
monatlich 2.B. nur 37,14. DM. 


Info-Katal Kathi - DM 


Bi orto bei R 
1 angeben) 


bitte Comp: 
Pocrach 31 + Par Kevelaer 1 


RIFS7SPEZIALVERSANDIR.T.S 





5/87. 


Compube mik 





Verkaufe Original-Software für CPC 
464, 3D Boxing zu 29 DM, 

51 DMI g Decathlon zu 
Pascal Scharff 

Parallelstr. 10 

6676 Bedeisheim 





C-18/116/Plus 4 

Verkaufe 15 meiner besten Programme 
für 20 DM auf Kassette (Cube, Stellar 
Wars, Bingo, N. Hunter u.a.) 





Nachnahme 23DM NAMEN 
Alte Poststr. 14 mm Kauf in 
4577 Nartrup HN lohnt IHN 
Tel.: 05436/285 mm sich INN 
AHLIEIEREREITRELLIENNG 
C-84 und VC-20 
Anwenderprogramme, TOOLs und 


Spiele zu Minipreisen! Liste en 80 
Pf, bei: ü = 
SF-Soft 

Mühlenweg 7 

3401 Seulingen 

Bitte Computertyp angeben! 
Programmautoren gesucht IN 





An alle C16/116/+4-Anwender 
Neuvorstellung (Kassetten) Textword 
Deutsch 16 oder 64 KB, Super Text- 
programm für HC-Rechn. und bild- 
schirmorientierter schneller Ablauf, 
druckerunterstützend, leichte Handha- 
bung. Info kostenlos bei: 

CSI Generalvertretung West 

K.-H. Schülbe 

Hägenersir. 68 

5630 Remscheid 

Tel.: 02191/291088 


***Cpc 6128**"CPC 6128*** 
Schickt uns eine 3" Disk + 20 DM. Da- 
für erhaltet Ihr eine 3" Disk voller Grafik- 
und Sounddemes; Anwenderprogram- 
me, Spiele und ein Grafikprg. mit tollen 
Demo-Bildern und als Zugabe ein Co- 
pierprg. fürgeschützte Basicprg. {nur für 
Sicherheitskopien). 

Thomas Schnsemann 

Friedenssir. 3% 

4408 Dülmen 

CPC 464 Kass. nur 15 DM senden. 


Te et eng 


C-18/116/Plus4 GRAFIK-CAD 
Zeichen- und Grafikprogramme für die 
16K-Version, Ein GAD-System (Basis- 
8ys.) für die 64K-Version. Anwendbar für 
technische Zeichnungen u.a. Ein um- 
fangreicher Befehlssalz ermöglicht ein- 
faches Bearbeiten einer Zeichnung z00- 
men, düplizieren, drehen, spiegeln, 
transferieren, löschen, 16 Ebenen, Info 
gegen Porto: 

Dipl.-Ing. M. Raetzei 

Ulvenbergsir. 6 

6100 Darmstadt 13 





Teletex, BTX, Video, Super Sound, 
strukt, Basic nach ANSI, integr. Textver- 
arb, und noch viel mehr, alles in 
deutsch. Bei ENTERPRISE Standard, 
Enterprise Ist unser Standard. Dieser 
tolle Computer bei uns schon ab 
DM 198,-. Also schnell unsere Info's art- 
fordern: 

Titanic Supersoft 

Simonssir. 8 

5600 Wuppertal 1 

Tel.: 0202/306795 





In eigener Sache... 
Der Anzeigenpreis für 


gewerbliche Kleinanzeigen 


wird ab sofort geändert!!! 


Der neue Preis liegt jetzt bei 8,- 


DM pro Zeile (siehe beilie- 


gende Kleinanzeigenkarte in der Mitte dieser Ausgabe) zzgl. 
der gesetzlichen Mehrwertsteuer! 


Wir möchten alle Inserenten auf diese Veränderung aus- 


drücklich hinweisen. 
Eine Veröffentlichung 


privater Kleinanzeigen 


erfolgt nur gegen Vorkasse! 


Inserentenverzeichnis: 
Computer Hard- & Software, Düsseldorf Seite 62 
Computersoft Jonigk, Hannover Seite 62 
R.T.S. Spezialversand, Kevelaer 1 Seite 62 
STS Soft Vertriebs GmbH, Castrop-Rauxel Seite 64 
Softwareversand Bachler, Bocholt Seite 61 
Titan-Computer ; Seite 59 
USS, Enger Seite 62 
Versandhandel R.Lindenschmidt, Löhne Seite 63 

Bitte beachten: 

Unserer Schweizer-Auflage liegt eine Beilage 
der Firma WEKA-Verlag AG, Zürich, bei. 
Wir bitten um gefällige Beachtung! 





887 


© © 
kleinanzeigen 


PLUS 4/C-16/C-116 Softwarepaket I 
01 Turbo Tape 10Times faster 

12 Deutsche Umlaute auf F1-F8 

27 Einkommenssteuer C16/Plus 4 
alles auf Tape für 10 DM Vorkasse (incl. 
Porto) bei: 

Jörg Hildebrandt 

Schlenkenbrink 25 

4973 Vlotho-Uffeln 





Hallo Werner-Fans! 

Werner Comp.Spieil mach hin für 
C64/128 nur 29,80 DM (MC) bzw. 39,80 
DM(Disk) sowie für SCHNEIDER CPC 
29,80 DM (MC), 49,80 DM (Disk) gibts 
bei der 

Versandbuchhandlung 

Hildegard Grüger 

Auf dem Spiek 14 

4708 Kamen 

Tel.: 02307/15041 

Versand portofreil 

Wir liefern alle Werner-Fan-Artikel. Pro- 
apekt anfordern! 


An alle Schneider-CPC-Besitzer! 

Seit dem 1.1.87 gilt meine neue erwei- 
terte Preisliste mit interessanten Pro- 
grammen für CPC 464/664/6128. For- 
dern Sie die neue kostenlose Liste an. 
Eintach Posikarle schicken an: 
Friedrich Neuper 

Postfach 72 

8473 Pireimd 

Auch Auslandsanfragen sind er- 
wünscht. 


C-16 Software Disk oder Tape 
50 Prg. 40 DM/25 Prg. 20 DM 

40 Spiele 30 DM/20 Sp. 15 DM 
10 Anw. 10 DM/S Arıw. 5 DM 
Kaiser SDM/BASIC-Kurs 5 DM 

50 Graph. 10 DM25 Graph. $ DM 
if Cassette...then Turbo-Tape 
Preise mit Nachnahme/Besteliung ab 15 
DM bei: 

Jens-Uwe Smolla 

Oberheidt 37 

5600 Wuppertal 12 


Verkaufe Org. Tape Games CPC a 15 
OM + Rückporto: 

Starion, Last V8, Socoer 86, Terromali- 
nos, Zoids, Willow Patern, Hacker, Equi- 
nox, Nick Fatdo, Batmarı, Way of Tiger, 
Nev.End.Story, Room ten, Bomb Jack, 
Sam.Foxmatchday, Bladerunner, Red 
Hawk, Codename Mat, Hypersports, St. 
Davis Snooker (Super)! 

Michael Sehlitt 

Fasanenweg 1 

4459 Uelsen 

Tel.: 05942/1943 


rn 15 Spiele für den C-16 zu 20 
DMI 

Shaolin, Pac-Men, Zapp, Bombs away, 
Bandits, SDI, Hangman, Jump man, 
Diggy, Breakl, Mimi, Schatztaucher, 
Castle of Ghost, Golf, Black Jack, nur 
gegen Vorkasse! 

Lars Behrmann 

Breßlauer Str. 5 

2217 Kellinghusen 

Nur Tapelt! 


Unser servicefreundlicher 
Test lalelarzialel-1WoJ[-it-1@anlimidlersis 


200 Topprogrammen 


Sllatzt5e (=/ ge [de]sit=/ameTelugttlnte 
Hardwareangebote für Ihren 


C-16/116 u. Plus 4 


Fordern Sie deshalb noch heute 


unseren umfangreichen, 
KositziallortzigW sie 1[o/eWanligsjellri-inn 
spielen und Hardware für Ihren 
mlelaetzteie/anjeläicz/arzTal 
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“Compute mit“ 


Sonderheft 2/87 
für C-16/116/plus 4 


jetzt überall im Handel! 


ACHTUNG # 
Schon wieder ein Neuier 


Neue Prei: 

EEE 

NntUrlich kostenlos #t S+S SOFT Vertriebs GmbH en ehauxen » 
ACHTUNG!!! Commodore 64!! C128!! 





